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Preface 



This Sort Reference Manual is written to familiarize readers 
with the types of sort that can be run on the System/34, 
and to serve as a reference for the programmer who must 
define and run sort programs. 

This manual describes how to: 

• Identify and select the type of sort needed 

• Complete sequence specifications sheets 

• Use the SORT command 

• Supply OCL and sequence specifications when using 
your procedures 

• Optimize sort run time 

This manual is not intended to teach an inexperienced sort 
programmer how to code sort programs. This manual is 
not a substitute for sort portions of System/34 classes 
offered by IBM or for equivalent sort training. 

The primary audience for the Sort Reference Manual is 
the account programmer. The secondary audience in- 
cludes third-party programmers and IBM field support 
personnel. 



How This Manual is Organized 

This manual has seven chapters, five appendixes, a glossary, 
and an index. The topics described in the chapters and 
appendixes are: 

Chapter Topics 

1 Sort functions 
How sort works 

Overview of sequence specifications 

2 Header specification 

3 Record type specifications 

4 Field specifications 

5 How to run sort 

6 Performance considerations 

7 Sample sort jobs 

Appendix Topics 

A Calculating the sizes of files for sort 

B Collating sequence 

C Header, record type, and field speci- 

fication column summaries 

D Integer (binary) and real number sorting 

E Sort printed messages 



System Requirements 

Refer to the IBM System/34 Planning Guide, GC21 -51 54, 
for a list of system requirements. 



Prerequisite System/34 Publications 

• IBM System/34 Introduction, GC21-5153 

• IBM System /34 Planning Guide, G C2 1 -5 1 54 

• IBM System/34 System Support Reference Manual, 
SC21-5155 

Sort Coding Material 

• Sequence Specifications, GX2 1-9089 



Related System/34 Publications 

• IBM System /34 Operator's Guide, SC2 1-5158 

• IBM System /34 Displayed Messages Guide, SC2 1 -5 1 59 

• IBM System /34 Source Entry Utility Reference Manual, 
SC21-7657 

• IBM System/34 Program Product Installation and 
Modification Reference Manual, SC2 1-7689 

• IBM System/34 Master Index, SC2 1 -7739 

The Publications Summary of the IBM System/34 Introduc- 
tion, GC21-5153, contains a complete list and brief descrip- 
tion of all available System/34 publications. 
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Chapter 1. Overview of Sort 



The sort program is part of the System/34 Utilities Program 
product. You can use the sort program to rearrange, drop, 
and reformat records in your files. 

Multiple copies of the sort program can run concurrently 
on System/34. 



SORT FUNCTIONS 

The three basic functions of sort are: 
• To rearrange records in a file 
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• To drop records from a file 
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To reformat records in a file 



9 aaa zx 



7 aaa zx 



3 aaa zx 



2 aaa zx 



1 aaa zx 




Sort 



zx 9 aaa 



zx 7 aaa 



zx 3 aaa 



zx 2 aaa 



zx 1 aaa 
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TYPES OF SORT: ADDROUT, TAGALONG, AND 
SUMMARY TAGALONG 

The three types of sort jobs are: addrout (address out) ; 
tagalong (specified data fields can be included with control 
fields in the sorted records); and summary tagalong 
(a total or totals can be accumulated in the sorted records). 



Addrout Sort 



The output from an addrout sort job consists of 3-byte 
relative record numbers of some or all of the records in the 
input file, as follows: 



3-Byte Relative Record Numbers 
Control Fields 
/ Data Fields 

/ / 



Input 



00 00 02 
00 00 01 
00 00 00 



00 00 07 
00 00 06 
00 00 05 
00 00 04 
00 00 03 



175 $3.50 



174 $2.25 



171 $4.00 



170 $2.50 



167 $3.15 



162 $2.75 



150 $3.00 



116 $4.00 



Employee Master File 
(presequenced in this 
example) 



Process 



Sort 



Omitting records where amount is less than $3.00 



Output 



Relative Record 
Numbers Only 



00 00 07 



00 00 05 



00 00 03 



00 00 01 



00 00 00 



Addrout Sort 
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Tagalong Sort 



The output from a tagalong sort is a file of sorted records 
that can contain. ■ 

• Control fields only 

• Data fields only 

• Control fields and data fields 
A tagalong sort works as follows: 



3-Byte Relative Record Numbers 
Control Fields 
/ Data Fields 

/ / 



Input 



00 00 02 
00 00 01 
00 00 00 



00 00 07 
00 00 06 
00 00 05 
00 00 04 
00 00 03 



175 $3.50 



174 $2.25 



171 $4.00 



170 $2.50 



167 $3.15 



162 $2.75 



150 $3.00 



116 $4.00 



Employee Master File 
(presequenced in this 
example) 



Process 



Sort 



Omitting records where amount is less than $3.00 



Output 



175 $3.50 



171 $4.00 



167 $3.15 



150 $3.00 



116 $4.00 




Control Fields and 
Data Fields 



Control Fields Only 



Data Fields Only 



Tagalong Sorts 
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Summary Tagalong Sort 

The output from a summary tagalong sort is a file of sorted 
summary records that usually contains: 

• Control fields only 

• Summary fields only 

• Control fields and summary fields 



Summary sort output can also include data fields. How- 
ever, you cannot determine which input record's data 
field(s) will appear in the summary record. 



A summary tagalong sort that sorts only on the first two 
digits of the control field works as follows (note the sum- 
marizing that occurs in the data fields that have a con- 
trol field of 17): 



3-Byte Relative Record Numbers 
Control Fields 
/ Data Fields 

/ / 



Input 



00 00 02 
00 00 01 



00 00 00 116 $400 



00 00 07 
00 00 06 
00 00 05 
00 00 04 
00 00 03 



175 $3.50 



174 $2.25 



171 $4.00 



170 $2.50 



167 $3.15 



162 $2.75 



150 $3.00 



Employee Master File 
(presequenced in this 
example) 



Process 



Sort 



Output 
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Dmitting records where amount is 
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1 
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17 $7.5C 








17 








$7.5C 


) 






16 $3.1 E 










16 










$3.15 






1 5 $3.0( 


) 








15 










$3.0( 


) 




11 $4.00 






11 






$4.00 







Control Fields and 
Summary Fields 



Control Fields Only 



Summary Fields Only 



Summary Tagalong Sorts 
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HOW SORT WORKS 

The input needed to run a sort job is: operation control 
language (OCL) statements, sequence specifications, and 
an input file to be sorted. Sort works as follows: 



Input 



Process 



Output 



OCL 

Statements 




© Sequence 
Specifications 




© File to be 
Sorted 
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Sort 








© Work File 
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' 








Sorted File 





(\)OCL statements are'your instructions to the system. 

©Sequence specifications are your instructions to the sort 
program. 

(|)F/7e to be sorted can be an indexed, a sequential, or a 
direct disk file with fixed length records, but sort 
processes each sequentially. 

©Work file is a work area on disk where sort writes all 
of the records you want to sort. The sort program can 
then work with the records in the work area without 
disturbing the input file. 



CD Sorted files can contain: 



• The relative record numbers of the records in the 
input file. 

• Parts, or all, of the records contained in the input 
file. 

• Summarized fields for each record type in the 
input file. 

Note: Unformatted sequential files created by FORTRAN 
do not have fixed length records. Therefore, they should 
not be used as input to the sort program. 



Overview of Sort 1 -5 



Sort Sequence Specifications 

You must always specify how you want a file sorted. You 
use sequence specifications to describe the type of sort 
you want, which records you want to sort, and how you 
want the records sorted. Sequence specifications can be 
stored as a source member or within a procedure member 
in a library; these specifications can also be entered through 
the display station keyboard. See Chapter 5 for a detailed 
description of how to supply sequence specifications for 
your sort job. 



Sequence Specifications Sheet 

The sequence specifications sheet contains three different 
kinds of specifications: header specification, record type 
specifications, and field specifications. The sample se- 
quence specifications sheet shows the location and pur- 
pose of all three: 



*m| InMrnMimwl Bwtinw* Machine! Corporation 

• SEQUENCE SPECIFICATIC 

Header 


Printed In U.S.A. 
)NS ' ' . 75 76 77 7. 7. .0 


P-j 1 1 ^Z..:J M M 1 




Lin. 


Job 


(in byte*) 
of Control Field 
Length! for Any 
Record Type 



| 

I 
1 


Card Match 


? 

8 
| 

X 


J 


I 
a 
o 

I 

1 


Output 

Length 

79 30 31 32 


u 

1 
1 

2 


I 

> 
i 


s 


1 
6 


CCP/Diik Sort Only 


Job DtKription- 

■ 


Numb- 


& 


Card: MATCH. 
SORT. SELECT, 


Stacker Select 


1 

1 


(3 


I 

1 
3 


U^h 


Disk: SORTR, 
SORTA, SORTRS 
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S 
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P 
M 


P 


s 




p 




. 


(Tape: SORTT 


« a. 42 43,4. .5 4. 47 « 49 50 51 63 S3 64 65 56 67 6. 59 60 .1 62 63 64 .5 66 67 68 69 70 71 72 
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1 II 1 


1 1 II 
























III 
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1 III II II 1 1 1 1 1 MM III III M 1 II 1 Ml 



Record Type 



Lin. 
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i 
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3 

3 


Factor 1 • 


Rel 


Factor 2 (Field, Coo*t»ni, or Keyword) 


Cornrntnti 


Number 
3 a 6 


X 




EQ 
NE 
LT 
GT 
LE 
CE 


O 
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Record ' 
Name | 

1 

40 41 42 43 44 45 46 47|46 49 50 51 62 63 54 55 56 67 58 59 60 61 62 63 64 65 66 67 66 69 70 71 72 


li' 

|, Loca 
°' From 
9 ,10 11 17 


To 


Loc 
20 21 22 23 
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lion | 
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24 28 26 27|28 29 30 31 32 33 34 35 36 37 38 39 
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Here you specify the 
type of sort job you 
will run. 



Here you specify which 
input file records you 
will sort. 



Field 



Lift. 
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Fore*. 










































Comment! 


Number 
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Fron- 


tion 
To 
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5 
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| 
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Overflow 
Field 


Rewrved 


Field 1 
Neme 1 

40 41 42 43 44 4s|46 47 48 49 50 51 52 63 54 65 56 67 60 59 60 61 62 63 «4 65 66 67 68 69 70 71 72 
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Here you specify how 
you want the records 
sorted and formatted. 
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Sort Execution 



The work record sort builds would look like this: 



You can use the SORT command statement to execute 
certain sort jobs. See Running Sort by Using the SORT 
Command in Chapter 5 for a detailed description of how 
the SORT command works. 

You can also create your own procedure member to exe- 
cute sort. This procedure member can be stored in the 
system library or in a user library, or the procedure can 
be entered directly from a display station keyboard. The 
contents of a procedure member that contains your OCL 
are explained in Chapter 5. 



Sort Operation 

Sort works with the records in your file as follows: 
1 . Sort reads a record from the input file. 

1 5 6 26 27 30 



Control Field A 



Data 



t 



Control Field B 



Note: Control fields are the fields you want the sort pro- 
gram to use to sort the records. See Column 7 under 
Column Descriptions in Chapter 4 for a detailed discussion 
of control fields. 



6. 



4 5 



Control Field B 



9 10 



30 



Control Field A 



Data 



t 



See Column 7 under Column Descriptions in Chap- 
ter 4 for a more detailed discussion of the work 
record. 

If you do not drop control fields, they always pre- 
cede the data fields in the work and output records. 
(See Column 28 under Column Descriptions in 
Chapter 2 for a discussion of how to drop control 
fields.) 

The sort program writes all of the input records 
specified by your record type specifications into 
the work file. 

The sort program checks your header and field 
specifications to see how you want to arrange the 
records in the output file. (You arrange the records 
in ascending or descending order by control fields.) 

The sort program writes the records into the output 
file in the order you have specified. 



The sort program checks your record type specifica- 
tions to see whether the record is one you want to 
sort. (Often you may not want to sort all of the 
records in the file.) 

If the record is one you want to sort, the sort pro- 
gram builds a work record, formatting it according 
to your field specifications. (The format of the work 
record is important because it controls the format 
of the output record.) 

Assume that your field specifications say: 

a. Put the contents of positions 27 through 30 in 
the input record into positions 1 through 4 of 
the work record. 

b. Put the contents of positions 1 through 5 in the 
input record into positions 5 through 9 of the 
work record. 

c. Put the contents of positions 6 through 26 in the 
input record into positions 10 through 30 of the 
work record. 
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OVERVIEW OF SEQUENCE SPECIFICATIONS 
Order of Sequence Specifications 

The normal order of sequence specifications is: 

1. Header line 

2. Record type lines 

3. Field lines 

This order can vary, however, depending on how many 
records you want to sort and the format of those records. 
(Format refers to the locations, lengths, and types of fields 
in a record.) If, for example, you want to sort all of the 
records in a file— and they all have the same format— you 
do not have to fill out record type specifications. Not 
filling out record type specifications is often referred to 
as an implied include-all.) 



Number of Records 
to be Sorted 


Format of Records 
to be Sorted 


Order of Sequence Specifications 


All of the records 

in the file 

(implied include-all) 


All the same format 


1. Header line 

2. Field lines 


Some of the 
records in the file 


All the same 
format 


1. Header line 

2. Record type lines 

3. Field lines 


All or some of 
the records in 
the file 


Several 

different 

formats 


1. Header line "| For first type 

2. Record type lines r of record 

3. Field lines ' format 

4. Record type lines ^ For second type 

5. Field lines j of record format 

6. Record type lines "1 One set for each additional 

7. Field lines j type of record format 1 


This does not mean that the records in the file must be grouped by format type. The sequence specifications must be * 
grouped (one set of record type and field lines for each format type). The records themselves can be in any order. 



For detailed information on how to include or omit certain 
records when sorting a file, see Column 6 under Column 
Descriptions in Chapter 3. 
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Specification Columns to Consider for Addrout 
Sort (SORTA) 

The shaded columns are the ones you must consider for an 
addrout sort job. 



Type of Sort 



Control Field and 
Sequence Information 



V^ 



Page Sequence 



IBM 



International Buiineu Machine! Corporation 

SEQUENCE SPECIFICATIONS 
Header 



Progranr 
Identification L 



GX21 -9089 
Printed in U.S.A. 
75 76 77 78 79 80 



mw& 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Largest sum 
(in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 



Stacker Select - 



Output 
Record 
Length 

29 30 31 32 



CCP/Disk Sort Only 



yj Record 
£| Length 



Format for Sorted File 



59 60 61 62 63 64 65 66 67 68 69 70 71 72 
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Line 


O 
< 

1 

<s 
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Factor 1 
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Factor 2 (Field, Constant, or Keyword) 


Comments 
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3 4 5 
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Location 


EQ 
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LE 
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17 18 
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19 




nstant- 














* Keyword — *\ 

Location I 




Record I 
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10 11 12 
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Comparison of an Input Record Field and a Constant 
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Comparison of Two Input Record Fields 
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Specification Columns to Consider for Tagalong 
Sort (SORTR) 

The shaded columns are the ones you must consider for a 
tagalong sort job. 



Type of Sort 



X 



Control Field and 
Sequence Information 




IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



Program 
Identificatic 



GX219089 
Printed in U.S.A. 
76 76 77 78 79 80 



&*££!$ 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Disk: SORTR, 
SORTA, SORTRS 



Largest sum 
(in bytesl 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 



Stacker Select 



Output 
Record 
Lerigth 

29 30 31 32 



CCP/Disk Sort Only 



Format for Sorted File 



58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 



Record Type 




Comparison of an Input Record Field and a Constant 



Comparison of Two Input Record Fields 

II MN 



Field 



Comparison of an Input Record Field and 
the Program Date. 



ill 



iiif 



From 
10 11 12 



mm 



13 14 15 16 



Overflow 

Field 

Length 



23 24 25 26 27 28 29 



Field I 

Name I 



3 54 55 66 57 68 59 60 61 62 63 64 65 66 67 68 69 70 71 72 



Definition of Normal Control Fields 
Definition of Opposite Control Fields 
Definition of Forced Control Fields 
Definition of Data Fields 
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Specification Columns to Consider for Summary 
Tagalong Sort (SORTRS) 

The shaded columns are the ones you must consider for a 
summary tagalong sort job. 



Type of Sort 



Control Field and 
Sequence Information 



V^ 




IBM 



International Business Machine! Corporation 

SEQUENCE SPECIFICATIONS 
Header 



Program 
Identifica 



GX21 9089 
Printed in U.S.A. 
75 76 77 78 79 80 



"iOfOi 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Largest sum 
(in bytes) 
of Control Field 
Lengths (or Any 
Record Type 

13 14 15 16 17 



Stacker Select — 



Output 
Record 
Length 

29 30 31 32 



CCP/Disk Sort Only 



yj Record 
E| Length 



Record Type 



Format for Sorted File 



58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 




, Factor 2 (Field, Constant, or Keyword) ' 



Location | 

To I 
24 25 26 27 1 28 29 30 31 32 33 34 35 36 37 38 39 






Record 
Name 



Comparison of an Input Record Field and a Constant 



Comparison of Two Input Record Fields 

TT I I I I I I I I I L-E 



Field 



Comparison of an Input Record Field and 
the Program Date. 



& 



$ 



mm 



a io 11 12 



iji.ii.ii 






Overflov 

Field 

Length 



m 



23 24 25 26 27 28 29 



Definition of Normal Control Fields 

Definition of Opposite Control Fields 

Definition of Forced Control Fields 

Definition of Data Fields 
Definition of Summary Data Fields 



53 54 55 56 57 



60 61 62 63 64 65 66 67 68 69 70 71 72 
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Chapter 2. Header Specification 



Only one header specification line is used for each sort job. 
Possible column entries, summarized on this page and in 
Appendix C for quick reference, are explained in detail 
in this chapter. 



HEADER SPECIFICATION COLUMN SUMMARY 



Column Summary 



Columns 



Entries 



Explanation 



1-2 



00-99 



Page number. 



3-5 



000 



Header line number. 



H 



Header line identification. 



Sif2! 



SORT A 



SORTR 



SORTRS 



Addrout sort job. 



Tagalong sort job. 



Summary tagalong sort job. 



uuiimiai y La^aivjnij qui l juu. 

Largest sum (in bytes) of control field lengths for any record type. 
Records in sorted file to be in ascending order by control fields. 



piw-; 



1-256 



mm 



Records in sorted file to be in descending order by control fields. 



Not used in System/34 sort jobs. 



19-25 



Blank 



Not used in System/34 sort jobs. 



26 



Blank 



Use standard collating sequence in compare operations. 



Use an alternate collating sequence in compare operations. ALTSEQ statements 
will define the collating sequence to be used. 



27 



or blank 



Print: Sequence specifications 

Diagnostic messages 
Program-status messages 

Display: Action messages 

Displayed messages 



Print: Program-status messages 

Display: Action messages 
• Displayed messages 



Print: 
Display: 



Action messages only 
Displayed messages 



Display: 



Displayed messages 



28 



y#w//, 



Blank 



X 



Keep control fields in output records in tagalong sort jobs 



Drop control fields from output records in tagalong sort jobs. 



Length of output records in tagalong sort jobs 



1-4096 



33 



Blank 



Not used in System/34 sort jobs. 



34 



N 



Data written on the work file will not be verified. 



Blank or character 
other than N 



Data written on the work file will be verified. 



35 



Blank 



Reserved for system use. 



Operator message SORT— 7724 will be issued. 



36 



Blank 



N 



Operator message SORT— 7724 will not be issued. 



37-39 



Blank 



Not used in System/34 sort jobs. 



40-72 



Any characters 



Comments. 



Columns that must be filled in for all sort jobs. 



///yyV/ Columns that must be filled in for tagalong sort jobs. 
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COLUMN DESCRIPTIONS 



Column 18 (Ascending or Descending Sequence) 



Columns 1-2 (Page Number) and 3-5 (Line Number) 

Page number (columns 1 and 2) and line number (columns 
3 through 5) form a five-digit sequence number. As the 
sort program reads sequence specifications, it checks the 
sequence numbers to make sure they are not in descending 
order. If the numbers are in descending order (if page 02 
specifications come before page 01 specifications, for 
example) and specifications are being issued, the sort 
program places a warning (the letter S) next to the line 
(the S stands for sequence error). After issuing a warning, 
the sort program continues reading the rest of the speci- 
fication lines, then issues a message and waits for further 
instructions from the operator. The operator can either 
continue or end the job. 



Control fields control the sequence of records in the sorted 
output file. Your column 18 entry indicates the sequence 
in which you want the records sorted. 



Column 


18 




Entry 




Sequence 


A 




Ascending sequence 
by control field 


D 




Descending sequence 
by control field 



Not used in System/34 sort jobs 



Because page number applies to all lines on a page, columns 
1 and 2 appear only once, in the upper right corner of the 
page. You number the pages in ascending order. 

The line number of the header line is always 000 and is 
preprinted on the coding sheet. 



Column 26 (Collating Sequence) 

Column 26 specifies the collating sequence you want the 
sort program to use in compare operations. (Compare 
operations determine whether one character is equal to, 
greater than, or less than another character.) 



Column 6 (Line Type) 

Column 6 of the header line contains a preprinted H to 
identify the line as a header line. 



Columns 7-12 (Job) 

Columns 7 through 12 tell the sort program what type of 
sort job you want to do. SORTA means addrout sort. 
SORTR means tagalong sort. SORTRS means summary 
tagalong sort. 



Columns 13-17 (Largest Sum [in bytes] of Control Field 
Lengths for Any Record Type) 

To calculate this entry: 

1. Add together the lengths of the control fields (N, O, 
and F in column 7 of field specifications) for each 
type of input record. 

2. Enter the largest of these totals in columns 1 3 
through 17. (The total must not exceed 256.) 

For more information, see Control Fields, Column 7 under 
Column Descriptions in Chapter 4. 



Standard Collating Sequence 

No entry in column 26 tells the sort program to use the 
standard collating sequence. There are slight variations 
in the standard collating sequence, depending on whether 
you are using both the zone and digit portions of the 
characters in your records, the zone portions only, or the 
digit portions only. Appendix B shows the complete 
collating sequence of each situation. 



Alternate Collating Sequence 

An S in column 26 tells the sort program you want to 
change the standard collating sequence.. To do this you 
must supply A LTSEQ statements immediately following 
the header specifications. Appendix B explains how to 
code A LTSEQ statements.) 

Note: Do not use packed or zoned factors in an include 
or omit record type specification (P or U in column 8) if 
you specify an alternate collating sequence. 
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Column 27 (Print Option) 

The sort program can issue: 

• Sequence specification lines 

• Diagnostic messages (S-, T-, and W-type messages) for 
any errors in sequence specifications 

• Program-status messages (l-type messages) to identify 
various stages of the job 

• Action messages (A-type messages, followed by 
displayed messages) to identify circumstances requir- 
ing attention before the job can continue 

• Displayed messages that appear on the display screen 
and that are included and explained in the Displayed 
Messages Guide 

Note: Sort printed messages are included in Appendix 
E of this manual. 

Column 27 indicates which of the preceding informa- 
tion you want the sort program to issue during a job. 



Column 28 (Output Option for Tagalong Sorts) 

Column 28 applies to tagalong sort (SORTR, SORTRS) 
jobs only. It indicates whether or not you want the sort 
program to drop control fields from output records after 
the records are sorted. A blank in column 28 means keep 
the control fields; X means drop them. 



Considerations for Dropping Control Fields 

Control fields are normally dropped when you use opposite 
control fields or an alternate collating sequence. In these 
two cases, the sort program changes the control informa- 
tion (during the sorting process) so that it is meaningless. 



Using Fields Both as Control and Data Fields 

If you are using opposite control fields or an alternate 
collating sequence and you want to keep the control 
information in a meaningful form in the output records, 
describe the fields twice: once as control fields and once 
as data fields. Data fields are not involved in the sorting 
process and are not changed by the sort program. 



Column 27 
Entry 

or Blank 



Program Issues 

Sequence specifications 
Diagnostic messages 
Program-status messages 
Action messages 
Displayed messages 

Program-status messages 
Action messages 
Displayed messages 

Action messages 
Displayed messages 

Displayed messages 



Columns 29-32 (Output Record Length [in bytes] for 
Tagalong Sorts) 

Columns 29 through 32 apply to tagalong sort (SORTR, 
SORTRS) jobs only. The entry in these columns tells the 
sort program the length of records in the final sorted file. 

If you do not drop control fields, the length includes both 
control and data fields. If you drop control fields, the 
length includes only data fields. (The record length must 
not exceed 4096.) 



Calculating Output Record Length When Dropping 
Control Fields 

For each type of record, total the lengths of all the data 
fields you are including in the job. Select the largest total. 
Enter this number in columns 29 through 32. 



Calculating Output Record Length When Not Dropping 
Control Fields 

For each type of record, total the lengths of the data fields. 
Select the largest total, add this total to the number in 
columns 13 through 17, and put the sum in columns 29 
through 32. 
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Column 34 (Non-Verify Option) 

Column 34 applies to all sort runs. If an N is placed in this 
column of the sort header statement, none of the data 
written on the work file will be verified. A blank or a char- 
acter other than N will cause the data written on the work 
file to be verified. 

Note: If you use the non-verify option (to minimize run 
time) when your output file is to overlay the input file, the 
input file might be destroyed if a terminal error occurs 
before end of job. Therefore, if the input file cannot be 
easily recreated, you should have a duplicate copy for 
backup. The input file can be destroyed under identical 
circumstances whether the non-verify option is used or 
not. However, the chance for input file destruction is 
greater when you use the non-verify option; therefore, 
you should use this option with care. 



Column 36 (Null Output— Bypass Halt for Message 
SORT-7724) 

Column 36 applies to all sort runs. A blank can cause the 
sort program to issue message SORT— 7724 NO INPUT 
RECORDS INCLUDED. The operator then can select 
either option 0, which creates an empty output file, or 
option 3, which cancels the job without creating an out- 
put file. An N in column 36 causes the sort program to 
create an empty output file without issuing message 
SORT-7724. 



Columns 40-72 (Job Description) 

Columns 40 through 72 are for your comments. You can 
use any characters you want in these columns. If the sort 
program prints specification lines (the column 27 entry 
is a zero or blank), the comments you include in these 
columns are printed. Comments have no effect on the 
program. 
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Chapter 3. Record Type Specifications 



Record type specifications tell the sort program which of 
the records in a file are to be sorted. Remember, if all of 
the records in a file are to be sorted, and they all have the 
same format, record type specifications are not required. 

Possible column entries, summarized on this page and in 
Appendix C for quick reference, are explained in detail 
in this chapter. 



RECORD TYPE SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Entries 


Explanation 


1-2 


00-99 


Page number. 


3-5 


01x-06x 


Line number. You can leave column 5 (x) blank, or enter any value to keep 
the specifications in ascending order. 


! <? :■;.■■■;■:. 


I 



Include line. 
Omit line. 


7 


Blank 


This is the first line of a set of I or O record type lines. 




A 


AND lines. These specifications continue the definition of the record described 
on the preceding line. 





OR line. These specifications define a different type of record than the one on 
the previous line. 


* 


Comment line. 


8 


C 


Use both zone and digit portions of characters. 


z 


Use only zone portion of 1 -character field. 


D 


Use only digit portions of characters. 


P 


Signed packed decimal data. 


U 


Signed zoned decimal data. 


9-12 


1-4096 


The input record position in which the factor 1 field begins (blank if field is only 
one position long). 


- 13*1$" 


1-4096 


The input record position in which the factor 1 field ends. 


[ 17^31 


EQ 


Factor 1 must equal factor 2. 


NE 


Factor 1 must not equal factor 2. 


LT 


Factor 1 must be less than factor 2. 


GT 


Factor 1 must be greater than factor 2. 


LE 


Factor 1 must be less than or equal to factor 2. 


GE 


Factor 1 must be greater than or equal to factor 2. 


""l8 ' 


F 


Factor 2 is another field in the same input record. 


C 


Factor 2 is a constant. 


K 


Factor 2 is a keyword. 


'■"2<ta$ ■-'■■■■' 


1-4096 


The input record position in which the factor 2 field begins (blank if field is 
only one position long). 


'"'wn ■■■■:: 


1-4096 


The input record position in which the factor 2 field ends. 


VHWhM 


Any characters 


The factor 2 constant 


40-72 


Any characters 


Comments. 








must be filled in. 






Columns that 
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COLUMN DESCRIPTIONS 



Column 6 (Line Type) 



Columns 1-2 (Page Number) and 3-5 (Line Number) 

Page number (columns 1 and 2) and line number (columns 
3 through 5) form a five-digit sequence number. As the 
sort program reads sequence specifications, it checks the 
sequence numbers to make sure they are not in descending 
order. If the numbers are in descending order (if page 02 
specifications come before page 01 specifications, for 
example) and specifications are being issued, the sort 
program places a warning (the letter S) next to the line. 
(The S stands for sequence error.) After issuing a warning, 
the sort program continues reading the rest of the specifi- 
cation lines, then issues a message and waits for further 
instructions from the operator. The operator can either 
continue or end the job. 



Column 6 identifies the line type. An I in this column 
stands for either an include or an include-all line; an 
stands for an omit line. 

If the type of sort job you are running requires you to code 
record type lines, you must use include or include-all lines 
to describe the records you want sorted. Records not 
described in include lines are not sorted. 



Include Line 

Include lines identify records you want the sort program 
to sort by describing particular record fields. 



Because page number applies to all lines on a page, columns 
1 and 2 appear only once, in the upper right corner of the 
page. You number the pages in ascending order. 

Record type line numbers are 01 through 06. The numbers 
in columns 3 and 4 are preprinted on the coding sheet. 
You can leave column 5 blank or enter any value to keep 
your specifications in ascending order. If you have more 
than six record type lines, use another coding sheet and 
start at line 01. 



Include-All Line 

Include-all is a special form of include line; it has no record 
description (columns 7 through 39 are blank). An include- 
all line tells the sort program to sort all of the records that 
have not been described by any preceding include or omit 
line for the job. Records referred to by an include-all line 
must have the same field specifications. 

Note: Only one include-all line can be used per job. If 
used, it must be the last record type line for that job. 



Out-of-Sequence Lines 

Use column 5 when you want to insert a specification with- 
out renumbering the other specifications. For example, to 
insert a specification line between lines 01010 and 01020, 
you can number it 01015, code it, and then continue to fill 
out the rest of the sheet. 

Be sure any lines that are out of sequence on your coding 
sheet are clearly marked. You can do this by writing a note 
in the margin of the page with an arrow pointing to where 
the insert belongs (Sample Job 3 in Chapter 7). 



Omit Line 

Omit lines identify records you do not want the sort pro- 
gram to sort. Omit lines are not required, but can be help- 
ful when you have many types of records you want the sort 
program to use and just a few you want omitted. Omit 
lines are normally followed by an include-all line, telling 
the sort program to sort all of the records that are not 
described by omit lines. 
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Sets 



There are two types of sets: include sets and omit sets. An 
include set identifies one or more record types you want to 
include in your sort job. An omit set identifies one or more 
record types you want to omit from your sort job. (The 
records in any record type always have at least one charac- 
teristic in common— such as an X in position 5.) 

Here are four rules to remember when you use include and 
omit sets: 



1 . All include sets must end with a field line. 

2. Omit sets never have field lines. 

3. Every omit set must be followed by an include set. 

4. The last set must be an include set. 

There are five types of include sets and three types of omit 
sets. 



Include Sets 1 



Type 



Column 6 



Column 7 



Explanation 



Include AND 
lines 



H, F,orO 



A 



Header line, field line, or omit line. 

New record type indicated by a blank in column 7. 

Lines that describe the same record type (as the previous line) 

have an A in column 7. 

Field line(s). 



} 



Record 

type 

lines 



Include OR 
lines 



H, F, or 



Header line, field line, or omit line. 

New record type indicated by a blank in column 7. 

Lines that describe a different record type (than the previous 

line) have an in column 7. 

Field line(s). 



Record 

type 

lines 



Include AND 
and OR lines 



H, F, or 







Header line, field line, or omit line. 

New record type indicated by a blank in column 7. 

This line designates a record type that is different from, but 

has the same field lines as, the record type described in the 

previous line(s). 

This line continues the same record type of a previous line or 

lines. This record type can be continued (IA), or a different 

record type can be started (10), provided all record types 

have the same field lines. Record types with different field 

lines would have to start a new include set. 

Field line(s) for either A or record types. 



Record 

- type 

lines 



Include only 
one record 
type (implied 
include-all 



Header line. 

No record type lines. 

Field line(s). 



Include-al 



H, F,orO 



Header line, field line, or omit line. 

This line tells the sort program to sort all of the records that 

have not been described by any preceding include and omit 

lines. Records referred to in this manner must have identical 

field specifications. 

Field line(s). 



{Record 
type 
lines 



Every include set must end with field lines. An include set can be followed by another include set, an omit set 
or //END. i 

Note: Records not described in include sets will not be sorted. 



Record Type Specifications 3-3 



Omit Sets 1 


Type 


Column 6 


Column 7 


Explanation 


Omit AND lines 


Hor F 




Header line or field line (last line of include set). 


(one record type) 





\t> 


New record type indicated by a blank in column 7. 







A 


Lines that describe the same record type (as the 
previous line) have an A in column 7. 


Omit OR lines 


Hor F 




Header line or field line (last line of include set). 


(different record 





\t> 


New record type indicated by a blank in column 7. 


types) 








Lines that describe a different record type (than 
the previous line) have an in column 7. 


Omit AND and 


Hor F 




Header line or field line (last line of include set). 


OR lines (differ- 








New record type indicated by a blank in column 7. 


ent record types) 





A 


Lines that describe the same record type (as the 
previous line) have an A in column 7. 










Lines that describe a different record type (than 
the previous line) have an in column 7. 


There are no field lines in omit sets. Each omit set must be followed by an include or an include-all set. 



^ Record 
[type 
) lines 



^ Record 
Mype 
) lines 



Record 

type 

lines 



Guide to Using Include and Omit Sets 

When to Use Include Sets: If you want to sort only a few 
records in a file, use an include set for each type of record 
you want to sort. 



When to Use Omit Sets: If you want to sort all but a few 
records in a file, use omit sets followed by either an include 
set for each type of record you want to sort or an include- 
all set. 



Mixing Include and Omit Sets: You can mix include and 
omit sets. But because the sort program processes the sets 
in the order they are coded, you must be particularly care- 
ful when you do this. For example, if you wanted to omit 
all records with a 2 in position 10 but sort those with a 2 
in positions 10 and 15, you would have to specify the 
include set before the omit set. If you specified the omit 
set first, all the records you wanted to sort would be 
omitted from the job. 



Column 7 (Continuation or Comments) 

Column 7 indicates the line's relationship to the preceding 
line. 



Column 
7 Entry 

Blank 



Explanation 

This line is the first of a set of include or 
omit lines. (The type of set is indicated 
by the column 6 entry: I for include or 
for omit.) 

This line is a continuation of the preced- 
ing line. The A stands for AND. 

This line applies to a different record type 
than the preceding line, but the control 
field specifications for both are the same. 
The stands for OR. 

This line is a comment line. Comment 
lines do not affect program operation in 
any way. Their only purpose is to help 
you remember what you were doing in a 
certain section of coding. Comments 
are printed only if column 27 of the 
header line contains a zero or a blank. 
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Column 8 (C/Z/D/P/U) 

Your column 8 entry tells the sort program how to inter- 
pret data in the factor 1 and factor 2 fields during compare 
operations. When the fields contain alphameric data, a C, 
Z, or D entry tells the sort program what portions of the 
characters to use. When the fields contain signed numeric 
data, a P or U entry tells the sort program whether the 
data is packed or zoned. 



Type of 
Data 


Column 
8 Entry 


Compare Operations 


Maximum 
Field Length 1 


Alphameric 


C 

Z 
D 


Use both zone and digit 
portions of the characters 

Use only the zone portion 
of the character 

Use only the digit portions 
of the characters 


256 characters 
1 character 
16 characters 


Signed 
Numeric 


p2 

u 2 


The numeric data is packed 
The numeric data is zoned 


8 bytes or 1 5 
digits and a sign 

16 digits 


For both factor 1 and factor 2 fields, which must be the same length. 
Do not use packed or zoned factors in an include or omit record type specification 
(P or U in column 8) if you specify an alternate collating sequence (S in column 26 of 
the header line). 



Significance of the Column 8 Entry 

You use record type specifications to tell the sort program 
which records you want to sort. You do this by instruct- 
ing the sort program to test each record by comparing the 
data in a specific field with the data in another field in the 
same record, with a constant, or with all or part of the 
program date. The data you are comparing is the factor 1 
field; the data you are comparing it with (the contents of 
another field in the same record, a constant, or all or part 
of the program date) is the factor 2 field. The result of the 
comparison determines whether or not that record will be 
sorted. Since the sort program sees your data as nothing 
more than a series of electronic bits, you must tell the 
sort program how to interpret the data: 

• If the data is alphameric, what part of the characters 
should be compared. 

• If the data is signed numeric, is it in packed or zoned 
format. 
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Interpreting Data 

EBCDIC characters are represented by a byte composed of 
8 bits. Each character has two parts: a zone portion and 
digit portion. Some characters have identical zone por- 
tions; some have identical digit portions. No two charac- 
ters have identical zone and digit portions. 



Suppose, for example, that you want to sort only records 
with a 2 in column 15 and a 2 in column 50. To get those 
records included in your sort, you would have to put a C 
in column 8. The C tells the sort program to use both the 
zone and digit portions of characters in its compare opera- 
tions, and no other character has the same zone and digit 
portions as a 2. 



Character 


How It Looks Inside the Computer 


Zone Portion 


Digit Portion 


* 

1 

2 

3 

K 

? 

P 

Blank 



0101 
1111 
1111 
1111 
1101 
0110 
1101 
0100 

1111 


1100 
0001 
0010 
0011 
0010 

1111 

0111 

oooo K 

0000 J 


Notice that the digit portions of a zero and a blank are 
exactly the same. 



If you put a D in column 8, you would also get the records 
with a 2 in column 15 and a 2 in column 50. However, you 
would also get records you did not want, because several 
characters have the same digit portion as a 2. 



Alphameric Data 

When the factor 1 and factor 2 fields contain alphameric 
data, the column 8 entry must specify one of the following: 

1. The zone and digit portions of the characters (C 
entry) 

2. Only the zone portion of the character (Z entry) 

3. Only the digit portions of the characters (D entry) 



If you instruct the sort program to use only the digit 
portions of characters (by putting a D in column 8), 
characters with identical digit portions will look alike and 
compare as equal. Likewise, if you instruct the sort pro- 
gram to use only the zone portion of characters (by put- 
ting a Z in column 8), characters with identical zone 
portions will look alike and compare as equal. So your 
column 8 entry is critical in ensuring that your compare 
operations produce the results you intend. 
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Numeric Data 

When the factor 1 and factor 2 fields contain numeric data, 
the column 8 entry must answer two questions: 

1 . Are the numbers signed or unsigned? 

2. Are the numbers packed or zoned? 



Format of 
Numeric Data 


Column 
8 Entry 


Definition 


Consideration 1 


Unsigned 


D 


Number does not have a sign. 


Absolute values of the numbers are used. 
If a number has a sign, it is ignored. For 
example, -3 would be considered equal 
to +3. 


Signed 


Packed 


P 


Number always carries a 
sign. When the number is 
placed in main storage it 
has a digit portion only. 


The sign controls the comparison. For 
example, -3 is less than and +5 is more 
than -6. 


Zoned 


U 


Number always carries a 
sign. When the number 
is placed in main storage, 
it has both a zone and a 
digit portion. 


The sign controls the comparison. For 
example, -3 is less than and +5 is more 
than -6. 


Before comparing numeric data, the sort program automatically converts any leading blanks to zeros. 



Signed Numbers: Signed numbers can be either positive 
or negative. The sign of a number is indicated by a 4-bit 
binary code. 



Packed and Zoned Numbers: A zoned digit is represented 
by 8 bits; a packed digit is represented by 4 bits. 



Sign 


Binary Code 


+ 
+ 
+ 
+ 


1111 1 
1010 
1100 
1110 

1101 
1011 


Standard form. The sort program 
accepts all four forms of the plus 
sign. Before sorting the file, how- 
ever, the sort program converts 
all plus signs to the standard form. 
If a main storage dump is printed, 
the plus sign will always be expressed 
as a hex F. 



Zoned Digits 


Digit 


Binary Form 







0000 


1 




0001 


2 




0010 


3 




0011 


4 




0100 


5 




0101 


6 




0110 


7 




0111 


8 




1000 


9 




1001 



Packed Digits 


Digit 


Binary Form 





0000 


1 


0001 


2 


0010 


3 


0011 


4 


0100 


5 


0101 


6 


0110 


7 


0111 


8 


1000 


9 


1001 



Zone Digit 
Portion Portion 



Digit Portion Only 
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In zoned numbers, the 4-bit sign code replaces the zone 
portion of the last digit in the number. In packed numbers 
the sign code takes up the last 4 bits of the number. 



Zoned 



Packed 



Positive 



Negative 



Positive 



Negative 



+2049 




2 4,v + * % \ 9 

11,1,1,110,0,1,011,1,1^,0^1^,1 j^XMi.i-.i.i^?i 

ZONE DIGIT ZONE DIGIT ZONE D\(§M ZONE fHGIT 

Positive Zone >.;||| 




-2049 



|1,1,1 t 1|0,0,1.0|1,1,1,1|0,0.0,0|1,1,1. 



ZONE DIGIT ZONE DIGIT ZONE 





+2049 




20 4 9 „ * -) 

|0 0)0 1 0|0 0|0 1 0[1 Bl 1 1 1 1 



'111 
DIGIT DIGIT DIGIT DIGIT DIcftsiGN (+) 



i 



204 9 





2 4 

| o o o o|o o 1 6|o o o 6|o 1 o 6| 

DIGIT DIGIT DIGIT DIGIT Dl 
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Columns 9-16 (Factor 1 Field Location) 



Coding Rules 



Factor 1 fields identify your records. (If all of your inven- 
tory records contain an I in column 2, for example, column 
2 is a factor 1 field.) The sort program identifies records 
you want sorted by comparing factor 1 fields with other 
fields in the same record, with constants, or with all or part 
of the program date. Columns 9 through 16 identify the 
locations of the factor 1 fields in the records. If there is 
more than one factor 1 field for the records you are 
describing, you must: 

• Describe each field in a separate record type line 

• Put an A in column 7 of every line (except the first) to 
tell the sort program that all of the lines apply to the 
same record type 

Columns 9 through 12 (From) identify where the factor 1 
field begins in the record. Columns 13 through 16 (To) 
identify where the field ends. 



Length of Factor 1 Fields 

A factor 1 field can contain anywhere from 1 to 256 
characters. No factor 1 field, however, can be longer than 
the length of the records you are working with. (For 
example, when you are working with 96-character records, 
the longest possible factor 1 field you can have is a 96- 
character field.) The length of factor 1 fields is also 
controlled by the column 8 entry. 



1. Entries must be right-justified: the From entry must 
end in column 12; the To entry must end in column 
16. 

2. To describe factor 1 fields that are only 1 character 
long, leave columns 9 through 12 (From) blank and 
enter the number of the record position that contains 
the character in columns 13 through 16 (To). 

For example, here is the entry you would make to 
describe the position of a factor 1 field that consists 
of a B in column 2. 

. Record Type 



Lint 


o 
3 

1 

I 
V 


S 

1 

8 


Factor 1 


Rel. 


Factor 2 (Field, Constant, or Keyword) 


Number 

3 J!l 


g 
I 




EQ 
NE 
LT 
GT 

ssss 
••<?£• 

17 18 


19 




li 

|( L<M«.o> 
* l Horn t» 

9 |'l0 11 17 13 14 15 15 


■* Keyword — H 

. : . -Vt> Location | 

W$&%i. 23 24 25 26 27 1 28 29 30 31 32 33 34 35 36 37 38 39 


a 


II 




I 




c 
















2E0CB 




j£: 





































i 









































































3 






















:•'*: 














s? 





































4 









































































5 









































































6 







































































Column 8 


Maximum Factor 1 Field Length 


C 


256 characters 1 


Z 


1 character 


D 


1 6 characters 


P 


8 characters 2 


U 


16 characters 


^hen factor 2 is a constant, the length of the factor 1 field 
must not exceed 20 characters. When factor 2 is a keyword, 
the length of the factor 1 field must be 6 if the keyword is 
UDATE, and must be 2 if the keyword is UMONTH, UDAY, 
or UYEAR. (See Columns 20-39 for more information.) 

2 Because the factor 1 field is packed, the field can actually 
represent 1 5 decimal digits and a sign. 
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Columns 17-18 (Relation) 



Column 19 (Field, Constant, or Keyword) 



The sort program identifies records you want to sort by 
comparing the factor 1 field (columns 9 through 16) with 
another field (columns 20 through 27) in the same record, 
with a constant (columns 20 through 39), or with all or 
part of the program date (columns 20 through 39). The 
other field in the same record, the constant, or the program 
date is called factor 2. Columns 17 and 18 tell the sort 
program what the results of the comparison must be. 
(If alternate collating sequence is used, both factor 1 and 
factor 2 are modified before the comparison is made.) 



The sort program identifies records you want to sort by 
comparing the factor 1 field (columns 9 through 16) with 
another field in the same record, with a constant, or with 
all or part of the program date. The other field in the same 
record, the constant, or the program date is called factor 2. 
Column 19 tells the sort program whether factor 2 is an- 
other field, a constant, or a keyword that represents all 
or part of the program date. F in column 19 means factor 

2 is a field; C means factor 2 is a constant; K means factor 
2 is a keyword. 



Column 

17-18 

Entry 


Meaning 


EQ 1 

NE 1 

LT 

GT 

LE 

GE 


Factor 1 must equal factor 2. 

Factor 1 must not equal factor 2. 

Factor 1 must be less than factor 2. 

Factor 1 must be greater than factor 2. 

Factor 1 must be less than or equal to 
factor 2. 

Factor 1 must be greater than or equal 
to factor 2. 


If you want the sort program to compare zone portions of 
characters (Z in column 8), EQ and NE are the only entries 
you can use. 



When you put an F in column 19, you use columns 20 
through 27 to identify the location of the factor 2 field in 
the records. When you put a C in column 19, you use 
columns 20 through 39 for the constant. When you put 
a K in column 19, the keyword must begin in column 20. 



Columns 20-27 (Factor 2 Field Location) 

The factor 2 field must be the same length as the factor 1 
field. It also must be in the same record as the factor 1 
field. 

Columns 20 through 27 are used to record the location of 
the factor 2 field. Columns 20 through 23 (From) identify 
the starting position of the field; columns 24 through 27 
(To) identify where the field ends. 



Coding Rules 



Entries must be right-justified: the From entry 
must end in column 23; the To entry must end in 
column 27. 



To describe fields that are only 1 character long, 
leave columns 20 through 23 (From) blank, and 
enter the number of the record position that con- 
tains the character in columns 24 through 27 (To). 
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Columns 20-39 (Factor 2 Constant) 



Alphameric Constants (Column 8 Entry is C, Z, or D) 



When factor 2 is a constant, you use columns 20 through 
39 to write in the constant you want to use. The constant 
can be any arrangement of characters and blanks. 

The constant must be the same length as the factor 1 field. 
For example, if you have a four-position numeric factor 1 
field, your constant field must take up four positions. If 
your constant is the number 6, you put the 6 in column 23, 
"and either leave columns 20, 21, and 22 blank or fill them 
with zeros. 



Record Type 



OR 



Factor 2 (Field, Constant, or Keyword) 




u 

19 




ista 
29 






4 Key wo 

Loc 

From 
20 21 22 23 


d_H 
- ~1 

ition | 

To 1 

24 25 26 27 |2a 


30 31 32 33 34 35 36 37 38 39 


40 41 


£ 








6 
































































































! 





























Record Type 



Factor 2 (Field, Constant, or Keywordl 



From 
20 21 22 23 24 25 26 27 



000p 



28 29 30 31 32 33 34 35 36 37 38 39 



The constant must be the same length as the factor 1 field 
and must always begin in column 20. 



Numeric Constants (Column 8 Entry is P, U, or D) 

Format: Numeric constants must be right-justified within 
the field length specified in factor 1 (within twice the field 
length if factor 1 is a packed number). For example, 
assume that factor 1 defines a six-position field in the input 
record, and that factor 2 is the numeric constant 123. 
To right-justify the constant within six positions, you 
would have to put the constant in columns 23, 24, and 25. 
Leading zeros are not required. Blanks and zeros look the 
same to the sort program. In the preceding example, 
columns 20 through 25 could contain either 000123 or 
1 23 (with tf representing a blank). 



Note: For character constants, a D in column 8 indicates 
that only the digit portion of a character will be used in the 
compare operations. For numeric constants, a D in 
column 8 indicates that the numbers are unsigned. 



If the factor 1 field contains a packed number, the length 
of the constant (including the sign) must be twice the 
length of the factor 1 field. 
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Signed Constants: If factor 1 is a packed number, the last 
character in the constant must be its sign (+ or -). If fac- 
tor 1 is a zoned number and the constant is a negative 
number, the last character in the constant must indicate 
both the numeric value of the last digit and the negative 
sign for the entire constant. 



Coding Negative Zoned Constants 


If Last Digit 


Character That 


How the Number Looks Inside 


in Constant is 


You Code 


the Computer 




Zone Portion 1 


Digit Portion 2 





- (minus code) 


0110 


0000 


1 


J 


1101 


0001 


2 


K 


1101 


0010 


3 


L 


1101 


0011 


4 


M 


1101 


0100 


5 


N 


1101 


0101 


6 





1101 


0110 


7 


P 


1101 


0111 


8 


Q 


1101 


1000 


9 


R 


1101 


1001 


The zone portion i 
The digit portion i 


ndicates the negative sign of the entire number, 
idicates the numeric value of the last digit in the 


number. 



For example, here are the entries you would make to sort 
records that have a packed negative 1 (-1) in positions 

I and 2, a zoned negative 24 (-24) in positions 5 
through 8, and a zoned negative 10 (-10) in positions 

II through 16. 



Record Type 



Line 


o 
< 

7 


Q 
O 
8 


Factor 1 


Rel. 


Factor 2 (Field, Constant, or Keyword) 




Number 
3 4 5 


g 

6 


1 

9 




EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


O 

19 




sta 

29 






Loca 
From 
10 11 12 


tion 

To 

13 14 15 16 


< Key wo 

Loc 

From 
20 21 22 23 


d-H 

tion | 

To 1 
24 25 26 27)28 


30 31 32 33 34 35 36 37 38 39 


~1 

Record ' 
Name | 

40 41 42 43 44 45 46 47|48 49 5C 





1 




I 




P 








t 








2 


£ 


§ 


u 






1 


- 














» 


















£ 


A 


CK 


E 







-1 









2 




r 


A 


u 








f) 








8 


B 


3 


c 






I 


M 
































Z 





NE 


D 




- 


2<u 









3 




T 


A 


u 






1 


f 






1 


6 


E 





c 










1 


- 




























Z 





N 


E 







- 


tj 









4 





























































































5 





























































































6 




















































































i.. 
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Columns 20-39 (Factor 2 Keyword) 

When factor 2 is a keyword, the column 8 entry must be 
a C. The keyword must begin in column 20; all unused 
columns through column 39 should be left blank. The 
keyword tells the sort program whether all or just part of 
the program date should be compared with the factor 1 
field (columns 9 through 16). 



Keyword 


Part of 
Program Date 


Factor 1 
Field Length 1 


UDATE 2 
UMONTH 
UDAY 
UYEAR 


Entire program 
date 

Month portion of 
program date 

Day portion of 
program date 

Year portion of 
program date 


6 characters 
2 characters 
2 characters 
2 characters 


The factor 1 field length must be 6 for UDATE, and must 
be 2 for UMONTH, UDAY, or UYEAR. 
If the UDATE keyword is used, the program date must be 
in the same format as the date contained in the input 
records. (Refer to the description of the DATE procedure 
in the System Support Reference Manual for information 
on the possible formats of the program date and for infor- 
mation on how to change the program date if necessary.) 



Columns 40-72 (Comments) 

Columns 40 through 72 are for your comments. If you 
instruct the sort program to print sequence specifications 
(column 27 of the header line is either blank or contains a 
zero), the comments will be printed along with your se- 
quence specifications. The comments have no effect on 
the program's operation. 

Many programmers like to use columns 40 through 47 to 
write the names of the records described in the record type 
specifications. This is why columns 40 through 47 are 
enclosed in dotted lines on the coding sheet. 
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Chapter 4. Field Specifications 



Field specifications tell the sort program how to arrange 
and format (build) records in the work file and the out- 
put file. Possible column entries, summarized on the next 
page and in Appendix C for quick reference, are explained 
in detail in this chapter. 
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FIELD SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Contents 


Explanation 


1-2 


00-99 


Page number. 


3-5 


07x-14x 


Line number. You can leave column 5 (x) blank, or enter any value to keep the 
specifications in ascending order. 


6 


F 


Field specification line. 


? 


N 


Normal control field. 





Opposite control field. 


F 


Forced control field. 


D 


Data field. 


S 


Summary data field. 


* 


Comment line. 


B 


C 


Use both zone and digit portions of characters in the field. 


z 


Use only zone portion of 1 -character field. 


D 


Use only digit portions of characters in the field. 


P 


Signed packed decimal data. 


U 


Signed zoned decimal data. 


V 


Force a data character into the data field. 


IMS 


1 -4096 


Start position of a field in the record (can be blank if the field is 1 character long). 


1346 


1-4096 


End position of a field in the record. 


§ 


Any character 


Forced control fields; the character you want the sort program to change. Also used 
for summary overflow indicator fields; the character to be used for the overflow 
indicator. 


I 


Any character 


Forced control or data field; the character you want the sort program to substitute. 
Also used for summary overflow indicator fields; the character to which the overflow 
field is initialized. 


m 


Blank 


Forced control field line is not a continuation of the preceding line. 


Any character other 
than blank 


Forced control field line is a continuation of the preceding line. 


20-22 


1-256 


Overflow field length entry for summary tagalong sort only. 


23-39 


Blank 


Reserved for system use. 


40-72 


Any characters 


Comments. 










that must be filled in for all sort jobs. 

that must be filled in when forced control fields are being used. 






Columns 












^^^ 


Columns 
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COLUMN DESCRIPTIONS 



Column 7 (Field Type or Comments) 



Columns 1-2 (Page Number) and 3-5 (Line Number) 

Page number (columns 1 and 2) and line number (columns 
3 through 5) form a five-digit sequence number. As the 
sort program reads sequence specifications, it checks the 
sequence numbers to make sure they are not in descending 
order. If the numbers are in descending order (if page 02 
specifications come before page 01 specifications, for 
example) and specifications are being issued, the sort 
program places a warning (the letter S) next to the line. 
(The S stands for sequence error.) After issuing a warn- 
ing, the sort program continues to read the rest of the 
specification lines, then issues a message and waits for 
further instructions from the operator. The operator 
can either continue or end the job. 

Because page number applies to all lines on a page, 
columns 1 and 2 appear only once, in the upper right cor- 
ner of the page. You number the pages in ascending 
order. 

Here is the recommended procedure for field description 
line numbers. Field line numbers are 07 through 14. The 
numbers in columns 3 and 4 are preprinted on the coding 
sheet. You can leave column 5 blank, or enter any value 
to keep your specifications in ascending order. If you 
have more than eight field lines, use another coding sheet 
and start at line 07. 

Use column 5 when you want to insert a specification line 
without renumbering the other lines. For example, to in- 
sert a specification line between lines 01070 and 01080, 
you can number it 01075, code it, and then continue to 
fill out the rest of the sheet. 

Be sure any lines that are out of sequence are clearly 
marked. You can do this by writing a note in the margin 
of the page with an arrow pointing to where the insert 
belongs. (Sample Job 3 in Chapter 7.) 



Column 6 (Line Type) 

Column 6 contains a preprinted F, identifying the line as a 
field line. For addrout sorts (SORTA), field lines describe 
control fields that the sort program uses to sort record 
addresses. For tagalong sorts (SORTR) and summary tag- 
along sorts (SORTRS), field lines describe the fields that 
the sort program uses to create the records in the sorted 
output file. The fields can be either control fields (used 
to sort the records) or actual data fields. In addition, for 
summary tagalong sorts, field lines describe the fields that 
the sort program summarizes (adds together). 



Your column 7 entry tells the sort program whether you 
are describing a control field, a data field, or a comment 
line. If you describe a control field, the column 7 entry 
indicates how the field is to be used. 

See Columns 7-8 to find the ways in which you can com- 
bine this entry with the column 8 entry. 



Column 




7 Entry 


Tells the Sort Program 


N 


This is a normal control field. Sort this 




field so that the data from the field is in 




the sequence specified in column 18 of 




the header line. 


O 


This is an opposite control field. Sort 




this field so that the data from the field 




is in the sequence opposite that speci- 




fied in column 18 of the header line. 


F 


This is a forced control field. Change 




the control field according to the entries 




in columns 9 through 19. 


D 


This is a data field. 1 


S 


This is a summary data field. 2 


* 


This is a comment line. 


1 Use this entry for tagalong (SORTR, SORTRS) sorts only. 


(If you us< 


j a D entry during an addrout sort, the line will 


be treated 


like a comment line.) 


2 Use this entry for summary tagalong (SORTRS) only. 


(If you us 


e an S entry during an addrout sort, the line 


will be tre£ 


jted like a comment line. If you use an S entry 


during a ta 


galong sort, the field will be treated like a normal 


data field. 





Note: The first control field defined on a form for a record 
type is the major control field; subsequent control fields 
for that record type are minor control fields. 
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Control Fields (N, 0, or F in Column 7) 

When your file has more than one type of record: 

• The number of control fields does not have to be the 
same for all record types. 

• The total lengths of the control fields do not have to be 
the same for all record types. 

When records with duplicate control fields (records with 
all control fields equal) are sorted, their order as output 
is unpredictable. 



Normal and Opposite Control Fields (N or O in Column 7): 
These control fields are fields in your input records that the 
sort program uses to sort on. However, you can define 
1 -character control fields that are not in the records by 
using an unconditional force (see Forced Control Fields). 



Forced Control Fields (F in Column 7): There are three 
types of forced control fields: 

• Conditional 

• Force-all 

• Unconditional 

Forced control fields affect the work and output records 
only. (It is important to remember that the sort program 
never changes your input records.) 

See Column 17, Column 18, and Column 19 for informa- 
tion on how to fill out the field specifications when you 
are using forced control fields. 



A conditional force occurs only if a control field in the 
input record contains a particular entry. Suppose, for 
example, that you want to sort a file of records, each of 
which has a 1-position control field. If the character in 
the control field is an X, you want to replace it with an A 
before you sort the records. To do this, you would use 
a conditional force. Your conditional force field would 
tell the sort program: 

• Build a work record from the input record. 

1 -Position Control Field Control Field Portion 







iData Portion 












Data 


n 


Data 




i 


\. 






V 


_, 



Input Record 



iWork Record 



• If the control field contains an X, change it to an A. 

^ 



Data 



X 



Data 



a! 



Data 



Input Record 



_, 

I Work Record 
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Force-all is a special type of conditional force. Force-all 
occurs only when a control field in an input record does 
not contain a particular entry. Suppose, for example, that 
you want to sort a file of records, each of which has a 
1 -position control field. If the character in the control 
field is not a C, an F, or a $, you want to put an X in the 
field before you sort the records. To do this, you would 
use a force-all line to force the X into the control field. 



Data Fields (D in Column 7) 

Data fields apply to tagalong (SORTR, SORTRS) sort jobs 
only. They are fields you want the sort program to include 
in the sorted records, but which you do not want the sort 
program to use in sorting the records. Within each include 
set (include and field lines), control field lines must be 
placed before data field lines. 



A force-all line follows a series of conditional force lines. 
For example, you may want to tell the sort program: 

• If the control field contains a C, replace it with a 1. 

• If the control field contains an F, replace it with a 2. 

• If the control field contains a $, replace it with a 3. 

• If the control field does not contain a C, an F, or a $, 
put an X in the control field. (You are forcing out all 
other possible entries by using a force-all line.) 

An unconditional force does not depend on entries in the 
input records. If, for example, you want to put a dollar 
sign ($) in the first position of every output record, you 
would use an unconditional force. Your unconditional 
forced control field would tell the sort program to put a 
dollar sign in the first available control field position of 
the work record. 



Control Field 
Portion 



Data Portion 



Any other control fields will go after the dollar sign. 
Assume the input records are in this format: 



Data 


Control 
Field A 


Data 


Control 
Field B 


Data 



The work record will then look like this: 



$ 


Control 
Field A 


Control 
Field B 


Data 



When your file has more than one type of record: 

• The number of data fields does not have to be the same 
for all record types. 

• The total lengths of all of the data fields do not have to 
be the same for all record types. Sort places blanks to 
the right of shorter data fields so that all total lengths 
are equal. 

Note: For a summary tagalong sort (SORTRS), you can- 
not determine which input record's data field (s) will appear 
in the summary record. 



Summary Data Fields (S in Column 7) 

An S in column 7 of the field specifications defines a 
summary data field. You can define summary fields for 
all three types of sort jobs, but the fields will be sum- 
marized (added together) only in summary sorts. In 
tagalong sorts (SORTR), summary fields are treated like 
normal data fields. In addrout sorts (SORTA), summary 
fields are treated as comments. 

In a summary sort, the summary data fields in the out- 
put records for all record types must always be in the same 
position. These data fields are summarized for all record 
types, even if all record types are not defined as containing 
summary fields. 

These output fields do not have to be in the same position 
that they occupied in the input records. See messages 
SORT-7278 and SORT-7280 in Appendix E. 

Note: The maximum number of fields that can be sum- 
marized is 24 for each record type in a sort job. 



Control Field Portion 



Data Portion 



See Column 19 for actual coding examples of forced 
control fields. 
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Comment Lines f* in Column 7) 

Comment lines help document the sort program. They do 
not affect program operation in any way. You can code 
comment lines anywhere in the sequence specifications; 
however, comments will be printed only if column 27 of 
the header line contains a zero or a blank. 



If you want the records sorted into ascending order by 
using the digit portion of the control field characters (by 
putting a D in column 8), they will be in this order: 



Column 8 (C/Z/D/P/U/V) 

Your column 8 entry indicates what portion of the input 
record characters you want the sort program to use in 
building and sorting the work records. The column 8 entry 
is critical in assuring that the sort produces the results you 
intend. See Columns 7-8 to learn how you can combine 
this column 8 entry with the column 7 entry. 



If you want the records sorted into ascending order using 
both the zone and digit portions (by putting a C in column 
8), they will be in this order: 



Column 


Character Portion 


Maximum 


8 Entry 


Used 


Field Length 


C 


Use both zone and digit 
portions of the 
characters 


256 charactei 



V 



Use only the zone por- 
tion of the character 

Use only the digit por- 
tions of the 
characters 

The characters are a 
signed, packed deci- 
mal number 

The characters are a 
signed, zoned deci- 
mal number 

Force a data charac- 
ter into the data field 



1 character 



16 characters 



8 characters 
or 15 digits 
and sign 

1 6 characters 



1 character 



Suppose, for example, you have a 1 -character control 
field in your input records which can be either an *, 1,2, 
or 3. The zone and digit portion of each character is: 



Character 


Zone 


Digit 


* 


0101 


1100 


1 


1111 


0001 


2 


1111 


0010 


3 


1111 


0011 



Suppose you placed a Z in column 8 and wanted the 
records sorted into ascending order. You can then be 
sure that the records with an * control field will precede 
the records with a 1, 2, or 3 control field. Since 1, 2, and 
3 have identical zone portions, records with any of these 
numbers as a control field will not be in any special order 
after the sort. 

If you want to force characters into your data field, place 
a V in column 8, and in column 18 specify the character 
to be forced. That character will be placed in the first 
available data field position of the work record. 

As you can see, your column 8 entry can drastically affect 
your sorted file. 

Do not confuse this column 8 entry with the column 8 
entry on the record type specifications. Column 8 of the 
field specifications tells the sort program what portion of 
a character to use to sort the records. The column 8 entry 
on the record type specifications helps select which records 
you want to be sorted. 



Opposite Control Fields 

If you want to sort records so that some control fields are 
in ascending order and other control fields are in descend- 
ing order, use opposite control fields. An opposite control 
field is sorted in ascending order (if you specify descend- 
ing order on the header line), or in descending order (if 
you specify ascending order on the header line). 
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If your file contains different record types, all of which 
have an opposite control field in the same record position, 
your column 8 entries for these control fields must be one 
of the following: 

• All Ds 

• All Cs 

• All Zs 

• Any combination of Cs and Zs 

With any other combination of entries (for example, Ds 
and Cs), you will not be able to predict the results of the 
sort. 

When you use opposite control fields, the sort program 
changes them in building the work record. Therefore, 
you usually drop this meaningless control field informa- 
tion (by coding an X in column 28 on the header line) 
for tagalong or summary sorts. If the opposite control 
fields are all Ds, you do not need to drop the control field. 
If you wish to retain the original control field data in the 
output record, repeat the information as a data field. 



Packed or Zoned Control Fields (Normal or Opposite) 

If you specify packed or zoned control fields, the sort pro- 
gram changes the control fields while building the work 
record. Therefore, you may drop the control field informa- 
tion by coding an X in column 28 on the header line. If 
you wish to retain the original control field data in the 
output record, repeat the information as a data field. 



Forced Control Fields 

Here are a few rules to remember when you are using 
forced control fields: 

1. You can have only 1 character in your forced control 
field. 

2. You can force only entire characters into your con- 
trol field. 

3. You can indicate either a conditional or an uncondi- 
tional force. 

4. A force-all line must be preceded by a conditional 
force line. 

5. You define a forced control field by placing an F in 
column 7 of the field specifications. 



See Columns 9-16, Column 17, Column 18, and Column 
19 for further information on how to complete the field 
specifications. 

Using Control Fields to Sequence the Sorted Records 

The order in which you describe control fields in the field 
specification lines determines the sequence of the records 
(tagalong sort) or the record addresses (addrout sort) in 
the sorted file. 

Suppose each record in your file that is sorted in ascending 
order (A in column 18 of the header line) has a normal 
control field in positions 1 and 2 and an opposite control 
field in positions 5 through 7. Each record represents one 
customer's order for a separate item. The part number is 
in positions 1 and 2; the number of parts ordered is in 
positions 5 through 7. Your unsorted file might look like 
this: 

Input Record Position 



1 | 2 | 3 


4 | 5 | 6 | 7 


1 7 


1 2 6 


1 3 4 


5 1 2 


2 1 7 


12 1 


3 1 5 


9 6 


4 3 4 


1 8 


5 1 7 


2 


6 3 4 


2 5 



Input 


Part 


Number 


Record 


Number 


Ordered 


Number 







You can use the first control field to sort the records in 
ascending order according to the part number. You can 
then use the second control field to sort the number of 
parts ordered in descending order within each group of 
parts. Your sorted file would look like this: 

Output Record Position 





1 


2 


3 


|4|B 





1 


5 




9 6 


1 


1 


7 


1 


2 6 


2 


1 


7 


1 


2 1 


3 


1 


7 




2 


4 


3 


4 


5 


1 2 


5 


3 


4 


2 


5 


6 


3 


4 




1 8 



Output Part Number 
Record Number Ordered 
Number 
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Include these field specifications to do the preceding sort. 



IBM 



il Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



.m 



Program 
Identification I 



GX219089 
Primed in U.S.A. 
75 76 77 78 79 80 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Disk: SORTR, 
SORT A, SORTRS 



°i°H" .? P ! ft r mi 1 1 rum 



Largest sum 
{in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 



Stacker Select =■ 



p| 



Output 
Record 
Length 

29 30 31 32 



CCP/Disk Sort Only 



y Record 
El Length 



40 41 42 43 |44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 



Record Type 



Line 


O 
C 

J 

7 


s 

N 

D 

8 


Factor 1 


Rel. 


Factor 2 (Field, Constant, or Keyword) 


Comments 


Number 
3 4 5 


S 

I 

t- 

6 


I 
is 

9 




EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


u 

19 




ista 

29 




_ _ _ _ _ n 

Record ' 
Name | 

1 

40 41 42 43 44 45 46 47|48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


Loca 

From 
10 11 12 


tion 
To 

13 14 15 16 


< Keywo 

Loc 

From 
20 21 22 23 


d-H 

ition | 
To 1 

24 25 26 27l 28 


30 31 32 33 34 35 36 37 38 39 





1 






* 
































































ft 


L 


L 




fiEr; 


5 




I 


HCL 


U 


DEO 




f 


M 




GOI 


T 















2 




















































































i 





















































3 




















































































i 

i 





















































4 




















































































i 





















































5 




















































































i 

i 





















































6 




















































































i 
i- 



















































Field 



Line 


is 

- a 

- a 

8 


















Forced 










































Comments 


Number 

3 4 5 


c 
c 

S. ' 
i- i- 

6 


Loca 

From 
9 10 11 12 


tion 

To 
13 14 15 16 


C 

6 

■o 

J 

17 


1 

'J 
1 
18 


c 
19 


Overflow 

Field 

Length 

20 21 22 


Reserved 
23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 


Field t 
Name 1 

40 41 42 43 44 45|46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 





7 




F \ 


1C 








1 








I 
















































r 


HI 


$ 




GP 


H 


r 


r 


c 


L 




F 


/ 


£ 


L 







/ 


s 




Qft£P2EQ 













8 




'C 


)C 








5 








7 
















































i 


HI 


5 




(H0 


N 


T 


ff 


p 


L 




F 


1 


E 


L 


D 




1 


s 




dSoWed 













9 




F I 


)C 








1 








2 
















































3 


Oh 


11 


ft 


QL 




E 


i 


E 


L 


D 




P 


E 


S 


C 


ft 


1 


8 


E ft 




AS 




DATA 






1 







F ( 


>G 








5 








7 
















































c 


or 


\T 


R 


UL 




r 


i 


I 


L 







D 


E 


S 


C 


ft 


1 


8 


e9 




AS 




DATA 






1 


1 




































































































































1 


2 




































































































































1 


3 




































































































































1 


.4 





































































































































Notice that the information occupies different positions 
in the input and output records. The record positions 
change when the control fields and data fields are moved 
from the input to the work and from the work to the out- 
put files. Since an opposite control field is specified, all 
of the control fields in the input record are dropped 
(columns 1 and 2 and 5 through 7). To save the control 
fields, specify them as data (see example). 
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Columns 7-8 

Here are all of the possible combinations for columns 
7 and 8. 







Maximum 


Column 7 


Column 8 


Field Length 


NorO 


C 


256 




Z 


1 




D 


16 




P 


8 




U 


16 


F 


C 1 


1 




Z 1 


1 




D 1 


1 


D 


C 


256 




z 


1 




D 


16 




P 


8 




U 


16 




V 


1 


S 


C 


256 




z 


1 




D 


16 




P 


8 




U 


16 




V 


1 


* 




Does not apply 
(comment line) 


For an unconditional force line and a force-all line, column 8 


must contain a C. For a conditional force line, the column 8 


entry refers to the comparison between the control field in the 


input record and the record character being replaced (contained 


in the column 17 entry) rather than to the substitute character 


(contained in the column 18 entry). 



See Column 7 and Column 8 for detailed discussions of 
each entry. 
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Columns 9-16 (Field Location) 

Columns 9 through 16 identify the input record positions 
that contain the record fields. Columns 9 through 12 
(From) identify the starting position of a field; columns 
13 through 16 (To) identify the position in which the 
field ends. 

The order in which you describe the control fields in the 
field specifications determines their order in the sorted 
output records. 

For example, suppose you have an input record that 
looks like this: 



Field Name 



Record Position 



Input Record 



ITEM 




PRICE 




BAL 




REORD 


(item 




(price 




(number 




(reorder 


number) 




per item) 




in stock) 




point) 


^ H 




«* H 




«* ► 




■* -H 



5 7 



12 



15 



21 23 



29 



However, you want your sorted output record to look like 
this: 



Output Record 



Field Name 



Record Position 



ITEM 


REORD 


BAL 


«* ► 


h« H-* W 



5 6 



19 



Assuming that you want to sort the records by item num- 
ber, here is how you would fill out the field specifications: 



Field 



Line 


S 

3 
2 

7 


Sr 
5 

N 
O 

B 


















Forced 












































Number 
3 4 5 


6 


Loca 

From 
9 10 u 12 


tion 
To 

13 14 15 16 


6 

§ 

17 


6 

J3 
A 

18 


19 


Overflow 

Field 

Length 

20 21 22 


Reserved 
23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 


Field I 
Name | 

40 41 42 43 44 45|46 47 





7 






N 


c 








i 








5 
















































I 


T 


£ 


M 











8 






D 1 


c 






Z 


3 






I 


<? 
















































R 


£ 


p 


R 












9 









c 






1 


JT 






l 


f 
















































B 


A 


L 










1 

























































































1 


1 






















































































1 


2 






















































































1 


3 






















































































1 


.4 
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As another example, if you want the 1 -character field in 
position 20 of your input record to be in the first position 
of the sorted output record, you would describe the field 
in the first line of your field specifications. In this example, 
the primary control field for the output file is determined 
by position 20 of the record. 



Line 


S 
3 

2 

| 

7 


5 

s 

8 


















Forced 


































Number 

3 4 5 


I 
6 


Loca 

From 
9 10 11 12 


tion 
To 

13 14 15 1§ 


s 
1 

o 

§ 
cc 

17 


1 

18 


d 

19 


Overflow 

Field 

Length 

20 21 22 


Reserved 
23 24 25 26 27 28 29 30 31 32 33 34 3 





7 






fit 


c 














2 


9 











































B 

































































9 

































































































































1 


































































2 


































































3 


































































4 

































































Field Length 

The length of the field depends on the column 8 entry. 
Column 8 Entry Maximum Field Length 

256 characters 

1 character 

16 characters 



8 characters or 

15 digits and sign 

16 characters 
1 character 



U 
V 

Coding Rules 



1. Entries must be right-justified. The From entry must 
end in column 1 2; the To entry must end in column 1 6. 

2. To describe fields that are only 1 character long, 
leave columns 9 through 12 (From) blank, and enter 
the number of the record position that contains the 
character in columns 13 through 16 (To). 



Column 17 (Conditionally Forced Character) 

See Column 7 for a general discussion of forced control 
fields. You make an entry in column 17 when you want 
to use a conditional force. (For example, you might want 
to put an * in a control field only if the present entry is 
an A.) When you use conditional force, the input record 
does not change, but the work and output records will 
contain an * instead of an A. (See Column 7 or Column 
18 for more information about conditional force.) 

The column 17 entry tells the sort program which character 
in the control field (defined in columns 13 through 16) 
you want to replace. The sort program checks to see if the 
control field in the work record contains the character you 
specified in column 17. If it does, the character in column 
18 replaces the control field character. 

If a control field can contain any one of several characters, 
and you want to specify a forced character replacement 
for each one, you must include a column 19 entry in all 
of the forced field lines (except the first). See Column 19 
for instructions. 

Besides being used for conditional force lines, column 17 
can also be used as a summary overflow indicator field. 
The column 17 entry, in this case, is the character that is 
the overflow indicator. For more information on summary 
overflow indicator fields, see Columns 20-22. 



Column 18 (Substitute Character) 

See Column 7 for general discussion of forced control fields. 
You make an entry in column 18 only when you are using 
a forced control field or a forced data field. The character 
in column 18 either replaces the control field character 
you specify in column 17, adds a new character to the 
control field, or adds a new character to the data field. 

Remember that a change to the control or data field does 
not alter your input record. Also, if you want to use 
substitute characters, you can force a 1 -character field 
(only an entire character can be forced). 

Besides being used for forced field lines, column 18 can 
be used as a summary overflow indicator field. The column 
18 entry, in this case, is the character to which the over- 
flow field is initialized. For more information on summary 
overflow indicator fields, see Columns 20-22. 
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Defining a Conditionally Forced Character 



Defining an Unconditionally Forced Character 



1. Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an F in column 7. 

3. Put a C, Z, or D in column 8. 

4. Leave columns 9 through 12 blank. 

5. Define the position of the control field in the input 
record in columns 13 through 16. 

6. Enter the character you want to replace in column 
17. 

7. Enter the character you want to replace it with in 
column 18. (You can use any character in column 
18.) 

Defining a Force- All Character 

1 . Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an F in column 7. 

3. Put a C in column 8. 

4. Leave columns 9 through 17 blank. 

5. Put the character that replaces the control field in 
column 18. 

6. Put any character in column 19. (The character in 
column 19 tells the sort program that the line refers 
to the same control field "n the work record as the 
preceding line. 

If you do not place a force-all line after conditional force 
lines and the sort program does not find the specified 
characters in the control field of the input record, the sort 
program: 

• Replaces the control field character with hex FF (if you 
specified ascending sequence in the header line). 

• Replaces the control field character with hex 00 (if you 
specified descending sequence in the header line). 



1. Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an F in column 7. 

3. Put a C in column 8. 

4. Leave columns 9 through 17 blank. 

5. Put the character you are forcing in column 18. 

Sample Job 4 in Chapter 7 illustrates the use of uncondi- 
tionally forced characters to group record types. 

Specifying an Overflow Indicator Field 

1. Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an S in column 7. 

3. Put a V in column 8. 

4. Leave columns 9 through 16 blank. 

5. Enter a character in column 17 if you do not wish to 
use an * as a replacement. If overflow occurs in any 
summary data field in the record, the initial value of 
the overflow field will be replaced by the character 
in column 17. 

6. Enter a character in column 18. If none of the sum- 
mary data fields overflow, the overflow field will con- 
tain the character specified in column 18. 
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Column 19 (Specifying Replacements for More Than One 
Character) 

If a control field in the input record can contain any one of 
several characters and you want to specify forced character 
replacements for more than 1 character, use a separate line 
to define each character you want to replace and the forced 
character you want to replace it with. 



Coding Rules 

1. Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an F in column 7. 

3. Put a C, Z, or D in column 8. 

4. Leave columns 9 through 1 2 blank. 

5. Define the control field in columns 13 through 16. 

6. Enter the first character you want to replace in 
column 17. 

7. Enter the character you want to replace it with in 
column 18. 

8. Fill in columns 1 through 6 (of the next line) as you 
would for any control field. 

9. Put an F in column 7. 

10. Put a C, Z, or D in column 8. 

1 1 . Leave columns 9 through 12 blank. 

12. Define the control field in columns 13 through 16. 

1 3. Enter the next character you want to replace in 
column 17. 

14. Enter the character you want to replace it with in 
column 18. 

15. Enter any character (except blank) in column 19. 
Your entry tells the sort program that the line refers 
to the same control field in the work record as the 
preceding line. 

Repeat steps 8 through 1 5 for any other characters to be 
replaced. 



Examples of Using Forced Control Fields 

You can use forced control fields to change (add to or 
replace) a character in a 1 -position control field. The 
following examples represent these types of forced control 
characters: 

• Unconditional force 

• Conditional force using only forced control fields 

• Conditional force using normal or opposite control 
fields and forced control fields 

• Force-all 
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Unconditional Force 

This example illustrates how you can unconditionally 
place a control field into the work and output records. 



Input Record 



Position 1 (control field) 20 through 22 (data field) 

ZEI7ZZ 



572 



7 
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Work Record 



Output Record 



Line 


Q 

3 

Z 

i 

t- 
7 


s 

D 
N 
O 

s 


















Forced 




Number 
3 4 5 


1 
6 


Loca 

From 
9 10 11 12 


tion 

To 
13 14 IS 16 


* 

o; 
17 


s 

1 

1 

18 


s 

19 









7 




F 


P 


c 




















♦• 









8 






r 






A 


P 






4 


i 













9 




r 

F 






























1 







F 





























+ 



Control 
Field 



Control 
Field 



This unconditional force 
moves a + into the first 
available work record 
position. 

Move the data field (posi- 
tions 20 through 22 of the 
input record) to the next 
three positions of the 
work record. 



572 



Data 
Field 



+ 


572 



Data 
Field 
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Conditional Force Using Only Forced Control Fields 

This example illustrates how control field characters change 
according to the conditions you specify. 



Input Records 



Field Specifications 



Work Records 



Sorted Output 
Records (ascending 
sequence assumed) 



Position 



4 (control field) 



20 through 22 (data field) 



7Z 
7Z 

7 £ 



618 



7 



510 



7 



307 



7 



EC 



EC 



It 



9 10 11 12 



M 



MY 






urjy 1 



If position 4 of the input record contains 
an A, move a 1 into the work record. 

If position 4 contains a B, move a 3 into the 
work record. 

If position 4 contains a C, move a 2 into the 
work record. 

Move the data field (positions 20 through 
22 of the input record) to the work record. 



1 


618 


3 


510 


2 


307 



Control Data 
Field Field 



1 


618 


2 


307 


3 


510 



Control Data 
Field Field 
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This example also shows how you can use column 19 to 
specify conditional replacements for more than one 
character. Because continuation lines are used, only one 
position in the work and output records is defined by the 
first three lines. If column 19 is left blank, each line would 
define a new position in the work and output records. 

If you are sorting records into ascending order (A in 
column 18 of the header line), the sort program places hex 
FF into the work record before you force any characters. 
If you are sorting records into descending order (D in 
column 18 of the header line), the sort program places 
hex 00 into the work record before you force any charac- 
ters. Therefore, if the sort program does not find an A, 
B, or C in position 4 of the input record, the hex 00 or FF 
is left unchanged in the work record. 



Conditional Force Using Normal or Opposite Control 
Fields and Forced Control Fields 

This example is similar to the previous one in that the 
control field in the input record causes changes in the work 
and output records. In this case, however, the sort program 
first moves the control field to the work record (because 
the first control field is a normal control field) and then 
changes it if necessary. Notice that any forced character 
replacements are made before the records are sorted. 
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Position 1 (control field) 



20 through 22 (data field) 



Input Records 



7 



7 



7 



r 


510 


? 




) 


822 


t 




I— 


618 


/ 



Field Specifications 



Work Records 



Sorted Output Records 
(ascending sequence assumed) 



Line 


3 — 

u 

- Q 

\ 5 

7 8 


















Forced ' 


Number 

3 t 5 


c 
c 

1 " 

6 


Loca 

From 
9 10 11 12 


tion 

To 
13 14 15 16 


I 

17 


1 

18 


(J 
19 






1 


7 
8 
9 

1 


- 


4 






- 


- 


- 








i 














I 


SI 


X 














I 


w 


20 

Tl 


1 


a 


a 

















5 


510 


9 


822 


7 


618 



Control Data 
Field Field 



5 
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Move the control field (in position 1 
of the input record) to the work rec- 
ord, and use it to sort the records into 
the specified order (assume that ascend- 
ing order is specified on the header line). 

If position 1 of the input record contains 
a 9, replace it with a 7 in the work record. 

If position 1 of the input record contains 
a 7, replace it with a 9 in the work record. 

Move the data field (positions 20 through 
22 of the input record) to the work record. 



Control Data 
Field Field 
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Force-All 

Suppose your control field can contain characters other 
than. A, B, or C. If you do not want a hex FFor 00 in the 
work and output records, use a force-aH line. 



Position: 



Input Records 



1 (control field) 20 through 22 (data field) 

A ? L 
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521 
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If position 1 of the input record contains 
an A, move a 1 into the work record. 

If position 1 contains a B, move a 3, into 
the work record. 

If position 1 contains a C, move a 2 into 
the work record. 

This is a force-all line. If position 1 of the 
input record does not contain an A, B, or 
C, place an * into the first available work 
record position. 

Move the data field (positions 20 through 
22 of the input record) to the work record. 



Work Records 
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Control Data 



Sorted Output Records 
(descending sequence assumed) 
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Control Data 
Field Field 
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Columns 20-22 (Overflow Field Length) 



Example of Summary Overflow Indicator Field 



These columns are used only by a summary tagalong sort 
to eliminate the possibility of an overflow condition. 

You can eliminate the possibility of an overflow condition 
by increasing the length of the summary data field to 
allow for any anticipated overflow. To get this increase, 
you code an overflow field length entry in columns 20 
through 22 of the field specifications. The overflow field 
length entry should be long enough to contain the sum of 
the summary data field length and the anticipated overflow 
length. The entry must be right-justified to column 22, and 
cannot exceed the maximum field length. 



Sometimes the summary data field size is too small to hold 
the sum of the corresponding data fields. Suppose the 
sorted file for a mail order company looked like this: 



A552 


23 




A552 


75 


Catalog 
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Catalog 
Number 


Number 
Sold 



For example, if you want to summarize a zoned field in 
positions 6 through 10 of your input record and you know 
that the output will exceed the five-position summary field 
by two positions, specify a 7 in column 22. 



Line 


3 

8 
1 

7 


Q 
8 


















Forced 


































Number 

3 4 5 


1 
6 


Loca 
From 

9 10 It 12 


tton 
To 

13 14 15' 16 


5 

5 

1 

17 


6 
1 

18 


3 

19 


Overflow 

Field 

Length 

20 21 22 


Reserved 
23 24 25 26 27 28 29 30 31 32 33 34 35 





7 






,9 


u 








e 






/ 


9 












z 































8 

































































9 
































































1 

































































1 


1 
































































1 


2 
































































1 


3 
































































1 


4 

































































If packed fields are summarized, columns 20 through 22 
should specify the number of bytes of packed data. 

For example, if you want to summarize a packed field in 
positions 1 through 3 of your input record and you know 
that the output will exceed the three-position packed 
summary field (five numbers plus sign) by one position, 
specify a 4 in column 22 (seven numbers plus sign). 
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If the company used a summary sort but specified only 
two positions for the summary data field, its sorted file 
would look like this: 
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Catalog 
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Sold 
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Catalog 
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Number 
Sold 



The number sold for the first catalog number should be 
103, but since you have only a two-position summary field, 
the third digit overflowed and was lost. Since the company 
must know when an overflow occurs, its programmer will 
define an overflow indicator field that will print a summary 
overflow indicator whenever an overflow occurs. 

Note: You can have only one summary overflow field 
for each record type. . 
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To define a summary overflow field, put an S in column 
7 and a V in column 8. The overflow field will be initial- 
ized to the character specified in column 18. If overflow 
occurs in any summary data field in the record, the initial 
value of the overflow field will be replaced by the character 
in column 17. (If you did not put an entry in column 17, 
the initial value of the overflow field will be replaced by 
an *.) If none of the summary data fields overflow, the 
overflow field will contain the character specified in 
column 18. 

Here are the entries you would make to: 

1. Initialize an overflow field to +. 

2. Replace the + with an * whenever a summary data 
field overflows. 
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Suppose the following field specifications were used for 
the previous example: 
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The summary output records would then look like this: 
A55203* I 



Catalog 
Number 




Overflow 
Field 



Catalog 
Number 




Number 
Sold 



Overflow 
Field 



You can also use the V entry in column 8 with a D entry 
in column 7. The character you specify in column 18 is 
unconditionally forced into your work record. See 
Sample Job 6 in Chapter 7 for an example of using these 
entries. 



Columns 23-39 (Reserved) 

These columns are not used. Leave them blank. 



Columns 40-72 (Comments) 

Columns 40 through 72 are for your comments. If you 
instructed the sort program to print sequence specifications 
(column 27 of the header line is either blank or contains a 
zero), comments are printed along with your sequence 
specifications. The comments have no effect on program 
operation. 

Columns 40 through 45 are enclosed in dotted lines on the 
coding sheet, because many programmers like to use these 
columns to write the names of fields they described in the 
field lines. 



The output records would then contain the catalog num- 
ber, the number of items sold (a summary data field), and 
the overflow field. The overflow field is initially blank, 
but it will contain an * after an overflow. 
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Chapter 5. How to Run Sort 



To run any sort job, you must: 

• Know the types of files you will use (input file, work 
file, output file) 

• Supply operation control language (OCL) and sequence 
specifications to run your job 

You can enter OCL statements to load and execute a sort 
job into the system in three ways: by using the SORT 
command; by executing your own sort procedure stored 
on disk, or by entering your own sort procedure through 
a display station keyboard. 



FILE INFORMATION 
File Characteristics 
Input File 

The input file is an area on disk that contains records to 
be sorted. Any existing indexed, sequential, or direct file 
with fixed length records can be used as input to the sort 
program; for example, an RPG II file or a file from a pre- 
vious sort job. If you use the direct access method to 
create a file for sort, you might want to test for and omit 
blank records because direct file areas are set to blanks 
before the file is created. 

Note: Unformatted sequential files created by FORTRAN 
do not have fixed length records. Therefore, they should 
not be used as input to the sort program. 



Work File 

The work file is an area on disk that is set aside as a work 
area. The sort program uses this area as working storage 
during the sorting process. You can either specify the work 
file area on disk or you can let the sort program automati- 
cally allocate it. 

You should usually give a work file scratch status 
(RETAIN-S or RETAIN-J) because the work file is created 
during a sort and usually has no function after the sort job 
(or sort job step in a multiple-step procedure) is completed. 

Output File 

The output file contains the sorted file. If the output file 
exists before the sort, it cannot have permanent status 
(RETAIN-P) because the sort program cannot write into 
an existing permanent file. However, if the output file is 
built during the sort, it can have scratch (RETAIN-J), 
temporary (RETAIN-T), or permanent (RETAIN-P) status. 
RETAIN-S should not be used because the file will not 
exist at the end of the sort job. 



Automatic Work File Allocation 

If you omit the work file FILE statement from your sort 
OCL statements, the sort program will try to automatically 
allocate a scratch area on the disk. This scratch area (which 
is allocated if enough disk space is available) will be large 
enough to contain all of the work records if all input 
records are selected for sorting. 
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File Programming Considerations 

You must consider several file characteristics when setting 
up your files or selecting the type of sort you will use. 
Some basic considerations are: 



Considerations 


Addrout Sort (SORTA) 


Tagalong Sorts (SORTR, SORTRS) 


Work file size 

Sort output 

Input file overlay 

Sort job running 
time 


Work file needs only be big enough 
to contain control fields and relative 
record numbers. 

Relative record numbers only. 

Output file should not overlay the 
input file. 2 

Usually shorter than SORTR or 
SORTRS. 


Work file must be big enough to contain 
the entire file to be sorted. 1 (See Appendix A 
for information on how to calculate work 
file size.) 

Control fields, data fields, and summary data 
fields. (See Types of Sort: Addrout, Tagalong, 
and Summary Tagalong in Chapter 1. 

Output file can overlay the input file; that is, the 
input file can also be the output file. 3 

Usually longer than SORTA. 


If the input file is a shared file (DISP-SHR) to which records are being added, or to which records have been added but that has not been 

closed, a Fl LE statement for the sort work file must be supplied before the records in the input file can be sorted. If the number of 

records in the input file is known, use that number to calculate the work file size. If the number of records in the input file is not known, 

use the maximum number of records that the input file can contain to calculate the work file size. (See Appendix A for information on 

how to calculate work file size.) 

If your input file is overlaid, you must have a backup copy of your input file that you can access using your addrout sort output. 

The space for the output file can be the same as the space for the input file. However, you should not overlay a file you want to sort unless 

you first make a backup copy of your input file. When you use the input file as the output file, either you must specify (for your output 

file) the location and size, or you must indicate that the output file is an existing file by specifying DISP-OLD in your output file FILE 

statement. (See description of F 1 LE statement parameters in the System Support Reference Manual.) 
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RUNNING SORT BY USING THE SORT COMMAND 

The SORT command permits you to run certain sort jobs 
without supplying your own OCL statements (see SORT 
Command Limitations). When using the SORT command, 
your sequence specifications must be stored in a source 
member on disk. The SORT command format is: 

SORT input file label,source member 

output file label, number of records, [user library name] , 



[I] 



SORT Command Parameters 

SORT command parameters are: 

input file label: Label of the existing data file on disk to 
be sorted. 

Source member: Name of the source member that contains 
the sort sequence specifications. 

Output file label: Label of the file that will contain the 
sorted data. This label must not be an existing file label. 

Number of records: Number of records that the new out- 
put file will contain. 

User library name: Name of the user library that contains 
the source member. If the user library name is omitted, 
the sort program searches the system library (#LIBRARY) 
for the source member. 

Y Place the sort job on the input job queue. Y specifies 
N' that the sort job should be placed on the input job 
queue. N (default) specifies that the sort job should not be 
placed on the input job queue. If this parameter is used to 
place a sort job on the input job queue the sort program 
must be contained in the system library (# LIBRARY). 

Input file label, source member, output file label, and 
number of records are always required. User library name 
is required only if the source member is contained in a 
user library. (See the System Support Reference Manual 
for more detailed information on source members and 
user libraries.) 



SORT Command Keying 

The SORT command statement can be keyed in two ways: 

1. It can be keyed in its entirety, for example: 

SORT MASTER,MASPECS,SORTMAST, 
1O0O,LIBR1,Y 

If any of the first four parameters are not keyed in, a 
display appears prompting for those parameters (see 
2 which follows). If the user library name parameter 
is not entered, the default is to #LIBRAR Y. If the 
input job queue parameter is not entered, the default 
is to N. Any parameter entered with the SORT 
command appears in the display prompting for the 
parameters. You can rekey any of the parameters 
when the screen appears. 

2. The word SORT can be keyed, which causes the 
following display to appear. The display prompts for 
all the parameters: 

LABEL OF FILE TO BE SORTED 

NAME OF SOURCE MEMBER CONTAINING 
THE SORT SPECS 

LABEL OF THE OUTPUT FILE 

NUMBER OF RECORDS TO BE PLACED 
IN THE OUTPUT FILE 

NAME OF USER LIBRARY CONTAINING 
THE SOURCE MEMBER 

PLACE JOB ON THE INPUT JOB QUEUE ' 
(NORY) 

If any required parameter is omitted in response to 
the display, they will be prompted for individually on 
the display screen: 

ENTER FILE LABEL OF FILE TO BE SORTED 

ENTER SORT SPECS SOURCE MEMBER NAME 

ENTER FILE LABEL FOR SORT OUTPUT FILE 

ENTER NUMBER OF RECORDS TO BE SORTED 
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After the SORT command statement is entered in one of 
the preceding ways, all parameters are checked to ensure 
their accuracy. A message is displayed when an error is 
encountered in a parameter. If none of the parameters 
contain an error, the SORT command is either placed on 
the input job queue or causes the following procedure to 
be executed: 

//MEMBER PROG RAM 1-#GS#MM 

//MEMBER USER1-#GS#MM 

// LOAD#GSORT 

// FILE NAME-INPUT,LABEL-input file label, 
DISP-SHR 

// FILE NAME-OUTPUT,LABEL-output file label, 
RECORDS-number of records 

7/ RUN 

//SOURCE source member [,user library name] 



SORT Command Limitations 

Use of the SORT command places limitations on the input 
file and the output file, and also requires that the sequence 
specifications be placed in a source member before the sort 
job can be run. 



Input File Limitations 

• Only one file on the disk should have the input file label. 
If the SORT command is used and more than one file 
have the given input file label, the file that has the latest 
date is sorted. 

• The sorted file cannot be written back over the input 
file. 

Output File Limitations 

• The output file must be a new file. The sorted file can- 
not be written over a file that already exists on the disk. 

• The output file is always a temporary file. Therefore, if 
the output must be something other than a temporary 
file, the SORT command cannot be used. 

Besides these limitations, the SORT command automati- 
cally allocates a work file, which generally increases the 
time needed to run a sort job. If you want to minimize 
sort running time, do not use the SORT command. For 
more information on sort timing considerations, see 
Chapter 6. 
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RUNNING SORT BY USING YOUR OWN SORT 
PROCEDURES 

File Information Needed When Using Your Own Sort 
Procedures 

The following text contains general file information. (For 
detailed FILE statement parameter descriptions, see the 
System Support Reference Manual.) 

If you enter your own OCL statements, you must supply 
the sort program with the following information: 



About the Input File: 

• Label of the file you will sort. The FILE statement 
NAME must be INPUT. Use the LABEL keyword to 
give the sort program the label of your file if it is not 
INPUT. For example: 

// FILE NAME-INPUT,LABEL-MASTER 

where MASTER is the label of your input file. 

About the Work File (Optional): 

• Label of your work file. The FILE statement NAME 
must be WORK. Use the LABEL keyword to give the 
sort program the label of your file if it is not WORK. 
For example: 



// file name-work,label-sortwork, 
Tblocks- 

l RECORDS- 



} 



number, RETAIN- 



{!} 



where SORTWORK is the label of your work file. 

Number of blocks or records in the work file. In the 
work file FILE statement, the number after either 
BLOCKS or RECORDS indicates the total number of 
blocks or records in the work file. See Appendix A for 
information on how to calculate the number for either 
BLOCKS or RECORDS. 

Status of the work file. RETAIN-S (scratch at end of 
sort job step) or RETAIN-J (scratch at end of job) 
indicates work file status. The work file is usually a 
scratch file because you usually do not need its infor- 
mation after a sort job (or sort job step in a multiple- 
step procedure) is run. 



Note: If the input file is a shared file (DISP-SHR) to 
which records are being added, or to which records have 
been added but that has not been closed, a FILE state- 
ment for the sort work file must be supplied. 



About the Output File: 

• Label of the sorted file. The FILE statement NAME 
must be OUTPUT. Use the LABEL keyword to give 
the sort program the label of your file if it is not 
OUTPUT. For example: 



// FILE NAME-OUTPUT,LABEL-SORTMAST, 
fBLOCKS- 



number,RETAIN- 



RECORDS- 



{:) 



where SORTMAST is the label of your output file. 

• Number of blocks or records in the output file. In the 
output file FILE statement, the number after either 
BLOCKS or RECORDS indicates the total number of 
blocks or records in the output file. See Appendix A 
for information on how to calculate the number for 
either BLOCKS or RECORDS. 

• Status of the output file. RETAIN-J (scratch at end 
of job), RETAIN-T (temporary), or RETAIN-P 
(permanent) indicates output file status. A file built 
during the sort job can have any of these parameters; 
however, an output file that exists before the sort job 
is run cannot have permanent status because the sort 
program cannot write into an existing permanent file. 
RETAIN-S should not be used because the file will not 
exist at the end of the sort job. 

Note: If the work or output file you want to use is an 
existing scratch (RETAIN-J) or temporary (RETAIN-T) 
file, you must either supply the location where the file 
begins and its originally allocated size or you must indi- 
cate that the file is an existing file by specifying DISP-OLD 
in your work or output file FILE statement. (See descrip- 
tions of FILE statement parameters in the System Support 
Reference Manual.) 
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Source Member Information Needed When Using Your 
Own Sort Procedures 

A source member can contain the sort sequence specifica- 
tions for a sort job. If this source member is in a library 
other than the system library, the user library name must 
be placed on the SOURCE statement in order for the 
source member to be located by the sort program. 

If a user library is specified on the SOURCE statement but 
is not found on disk, sort will search the system library for 
the source member. 

Note: The wrong sequence specifications will be used by 
the sort program if the user library is not on disk and the 
source member in the system library is not the one desired. 

The format of the SOURCE statement is: 

//SOURCE source member [,user library name] 

where the user library name is an optional parameter. 

For a detailed description of source members and user 
libraries, and for information on how source members and 
procedures can be created by using the $MAINT system 
utility program, see the System Support Reference 
Manual. 

Source members and procedures can also be created and 
updated by the Source Entry Utility (SEU). See the 
Source Entry Utility Reference Manual for information 
on how to use SEU. 



Executing Sort Procedures Stored on Disk 

If you use a procedure that is on disk, sort sequence 
specifications either can be contained in a source member 
or can be contained within the procedure. 

To execute the procedure, enter either: 

name 
or 

// INCLUDE name 
where name is the name of the procedure. 



If the sort sequence specifications are contained in a source 
member, the procedure includes: 

// LOAD #GSORT 

//FILENAME-INPUT,... 

//FILE NAME-WORK, . . . (optional) 

//FILENAME-OUTPUT,... 

// RUN 

//SOURCE source member[,user library name] 

where the referenced source member includes: 

(header specification) 

(record type specifications) 

(field specifications) 

// END 

Note: If the procedure is one that does not call a terminal, 
an END statement must also follow the SOURCE 
statement. 

The sort sequence specifications can be included in the 
procedure, which then includes: 

// LOAD #GSORT 

//FILENAME-INPUT 

// FILE NAME-WORK, . . . (optional) 

//FILENAME-OUTPUT 

//RUN 

(header specification) 

(record type specifications) 

(field specifications) 

//END 
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Note: The procedure should contain an END statement 
after the last sort sequence specification statement. If 
there is no END statement, undersirable results may occur. 
For example: 

• OCL statements following the last sort sequence 
specification statement will be diagnosed as sort 
sequence specification statements. 

• The PROG RAMI message member will be reset so that 
no sort error messages are issued if the END statement 
is keyed in at the display station keyboard after the 
procedure is done executing. 



Entering Sort Procedures through a Display Station 
Keyboard 

If you enter the OCL for a procedure through a display 
station keyboard, sort sequence specifications either can be 
contained in a source member or you can key them in with 
the sort procedure OCL. 

When sort sequence specifications are contained in a source 
member, the following OCL statements are keyed: 

//LOAD#GSORT 

//FILENAME-INPUT 

//FILE NAME-WORK, . . . (optional) 

//FILENAME-OUTPUT, ... 

//RUN 

//SOURCE source member[,user library name] 

where the referenced source member includes: 

(header specification) 

(record type specifications) 

(field specifications) 

//END 



The sort sequence specifications can be keyed in with the 
sort procedure OCL statements as follows: 

// LOAD #GSORT 

//FILENAME-INPUT, ... 

//FILE NAME-WORK (optional) 

//FILENAME-OUTPUT,... 

//RUN 

(header specif ication) 

(record type specifications) 

(field specifications) 

// END 

Note: The END statement indicates to the sort program 
that the last sort sequence specification statement has 
been entered. 
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Chapter 6. Performance Considerations 



The time required to run a sort job can vary greatly, and 
depends on the following factors: 

• Number of records to be sorted 

• Record size 

• Number of sequence specifications 

• Whether or not alternate collating sequence is being 
used. 

• Disk location of the input, work, and output files 

• Whether or not automatic work file allocation is being 
used 

• Order of records in the input file 

• Use of the non-verify option 

• Region size 

• System environment in which a sort job executes 

The following text describes how each factor affects the 
time required to run a sort job. 

NUMBER OF RECORDS TO BE SORTED 



NUMBER OF SEQUENCE SPECIFICATIONS 

The more sequence specifications you use, the less main 
storage space will be available for records. 

• Code required by the select/build routine for any sort 
job uses about 100 bytes of storage. (The select/build 
routine is the machine language program created by the 
sequence specifications.) 

• Each sequence specification uses about 25 bytes of 
storage. (Remember that comment lines use no main 
storage.) 

• If you specify includes and/or omits (referring to packed 
data) for your sort job, the select/build routine will use 
an additional 200 bytes of storage. 

• If you specify field statements (referring to packed data) 
for your sort job, the select build routine will use an 
additional 80 bytes of storage. 

• An alternate collating sequence uses an additional 375 
bytes of storage. 

Consider using additional sequence specifications to ex- 
clude records you do not want to sort. Your sort job may 
run faster than if you use fewer specifications but process 
more records. 



The more records you want to sort, the longer the sort job 
takes to run. For the most efficient sort job, therefore, use 
the record omit option whenever possible. 



RECORD SIZE 

The larger the records, the longer it takes to sort a file. 
Therefore, if program run time is important to you, do not 
include unnecessary fields in your sort job. Every field you 
do not include decreases the record size by the length of 
that field. Remember, the sort program builds a work 
record for each input record included in the sort. 



ALTERNATE COLLATING SEQUENCE 

Use of an alternate collating sequence increases the time 
it takes to run a sort job (see Alternate Collating Sequence 
in Appendix B). 



DISK LOCATION OF FILES 

Because the sort program must move each record you want 
to sort at least two times (first from the input file to the 
work file, then from the work file to the output file), file 
location affects how long it takes to run a job. The dis- 
tance the.disk arm (or arms) must travel between the input 
and work files and between the work and output files can 
be minimized to reduce running time. 
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File Placement On a Single Disk System 



File Placement On a Multiple Disk System 



The following shows how the input, work, and output files 
for a sort job can be placed on a single disk system. The 
first method shown is usually the fastest: 



The following shows how input, work, and output files for 
a sort job can be placed on a multiple disk system. The 
first method shown is usually the fastest: 



Methods of File Placement On a Single Disk System 



Methods of File Placement On a Multiple Disk System 



Positions of 
to Read the 
and Output 

Read Head Movement ' 


Read Head 
Input, Work, 
Files 

\ 


Positions of Read Head 
to Read the Input, Work, 
and Output Files 

Read Head Movement 


^r \s v 


▼ v V' 


^ &§$pljfe ^.w&tt ••;?••: 'iW$$ti£] 


( |||r|p^:- ;.OHto«3 \s ^:-:-^%l3 y& 


Disk Area ) Input Output Work 


Disk Area). . !. nput . 1 .. L 


( Output Input Work 


i Output [ 




\ Input Work Output 




istest 


First Disk 


llilllllj Usually Processes the Fj 





Read Head Movement 



Disk Area 



S7 



S? 



If! \lW$$?.t : i' ';$£¥• : $. I& : • -;'^ • Sfi 


Output Work 


Input Work 





Second Disk 



llllllllli Usually Processes the Fastest 



The first disk can be either disk A1 or A2; the second disk 
is the other one. If all files must be contained on one 
disk in a multiple disk system, use file placement as des- 
cribed under Fife Placement on a Single Disk System. 

Note: On a system that is running in a multiprogramming 
mode, a sort job may run faster if one spindle is totally 
dedicated to accessing the sort input, work, and output 
files. 
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AUTOMATIC WORK FILE ALLOCATION 



NON-VERI FY OPTION 



Single Disk System 

Automatic work file allocation usually increases the time 
needed to run a sort job on a single disk system because an 
automatically allocated work file is not arranged for a fast 
sort run. If you want to minimize sort running time, 
determine the best location for your work file and use the 
FILE statement to specify your work file location rather 
than using automatic work file allocation. 



If an N is entered in column 34 of the sort header specifi- 
cation, the sort program does not verify data written on 
the work file. The amount of performance improvement 
depends on file size, number of records, and file location. 

Because you might create a file of invalid data when you 
specify the non-verify option, using this option is usually 
not the best way to improve your sort program perfor- 
mance. You should consider other factors that affect 
performance before you use this option. 



Multiple Disk System 

Automatic work file allocation usually does not increase 
the time needed to run a sort job on a multiple disk system. 
Run time increases only if both input and output files are 
on one disk and space is not available for the work file on 
the other disk. In this case, sort job run time is similar to 
the time required to run the same sort job on a single disk 
system. 



REGION SIZE 

You can increase the region size that the sort program uses 
whenever you have enough main storage available to do so. 
The larger region size usually allows the sort program to 
process more records per disk access, which usually reduces 
the time required to sort records in a file. (The minimum 
region size for the sort program is 14K bytes.) 



ORDER OF RECORDS IN THE INPUT FILE 

The order of input file records can affect how long it takes 
to run a sort job. Suppose that two files have about the 
same number of records to be sorted. Suppose further 
that the two files contain identical information; however, 
the first file has more records in the sequence you want 
than the second file has. The records in the first file can 
usually be sorted faster than those in the second file if the 
same sequence specifications are used to sort both files. 



SYSTEM ENVIRONMENT IN WHICH A SORT JOB 
EXECUTES 

Two identical sort jobs operating in equal size regions may 
have different run times, depending on their respective sys- 
tem environments. A sort job that competes for system 
resources in a multiprogramming environment usually re- 
quires more running time that the same sort job would 
require if it were the only job executing on the system. 
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Chapter 7. Sample Sort Jobs 



Each of the seven jobs in this section has: 

1. An introduction explaining its purpose 

2. Filled-out sequence specification sheets 

3. Discussion of the sequence specifications 

The first six jobs use the following files and input records. 
(Sample Job 7 uses other files and input records, which 
are explained in the introduction to that job.) 



Files 



Records in Files Contents of Records 



Inventory 


Inventory 


Quantities of items 


file 


records 


in stock 

Number of trans- 
actions for each 
stock item 


Transaction 


Issue records 


Shipments of items 


file 




to customers 




Receipt 


Purchases of more 




records 


items from suppliers 
(vendors) 




Adjustment 


Corrections to inven- 




records 


tory quantities 
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The formats of the four types of records are shown in the 
following charts. 



Record Formats for the Inventory File 




Record 


Field 








Positions 


Names 


Contents 1 






1-6 


ITEM 


Number of stock item to which the record applies. 


Item 
Information 




7-10 


CLASS 


Class of the item (men's clothing, jewelry, and so on). 




11-24 


DESC 


Description of the item. 


25-27 


LOC 


Location of the warehouse where the item is stored. 






28-29 


UNIT 


Unit of measure for ordering the item (by the pound, 
by the dozen, and so on). 






30-34 


COST 


Cost of the item per unit. 






35-39 


PRICE 


Price (per unit) at which the item is sold. 






40-45 


REORD 


Reorder point (lowest stock quantity allowed). 




Inventory 


46-50 


QTY 


Number of units to order when reordering. 


Stock Status 


Record 


51-56 


BAL 


Number of units in stock. 


and 




57 




Not used. 


Reorder 




58-62 


ORDER 


Number of units ordered, but not yet received. 


Information 




63-68 




Not used. 






69-74 


AVAIL 


Number of units available (BAL + ORDER). 






75-80 


PORDER 


Purchase order number. 






81-86 


PDATE 


Date of purchase order. 






87-91 


VEND1 


First vendor. 






92-96 


VEND2 


Second vendor. 




97-99 


TRANS 


Number of transactions for this period. 


Transaction 




100-105 


TDATE 


Date of last transaction. 


Activity 




106-111 


ISSUES 


Number of units issued during this period. 


Any unsigne 


d numeric field (packed or zoned) 


can be treated as character information. 
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Record Formats for the Transaction File 




Record 


Field 






Positions 


Names 


Contents 1 




1 


ID 


1 (identifies this record as an Issue record). 




2-7 


ITEM 


Number of the stock item to which record applies. 




8-12 


QTY 


Number of units ordered (5 dozen, 32 pounds, and so on). 




13-19 


CUST 


Customer number. 


Issue 


20-27 


INV 


Invoice number. 


Record 


28-33 


DATE 


Date of the order. 




34 


DIS 


Discount information. 




35-39 


PRICE 


Price of the item per unit. 




40-42 


CON1 


The constant 001. 




43-50 


COST 


Total cost of items ordered. 




1 


ID 


R (identifies this record as a Receipt record). 




2-5 


CLASS 


Class of the item ordered (men's clothing, jewelry, and so on). 


Receipt 


6-11 


ITEM 


Number of the item ordered. 


Record 


12-16 


PRICE 


Price of the item per unit (by the dozen, by the pound, and so on). 




17-22 


PORDER 


Purchase order number. 




23-27 


QTY 


Number of units ordered. 




1 


ID 


A (identifies this record as an adjustment record). 




2-7 


ITEM 


Number of the stock item to which record applies. 




8 


CODE 


Adjustment code (identifies reason for the adjustment). 


Adjustment 


9-13 


QTY 


Number of units (dozens, pounds, and so on) being added or subtracted. 


Record 


14-17 


OK 


Authorization for the adjustment. 




18-23 


DATE 


Date of the adjustment. 


Any unsigned n 


jmeric field (packed or zoned) can 


be treated as character information. 



SAMPLE JOB 1: PRODUCING A FILE OF INVENTORY 
INFORMATION FOR REORDERING STOCK ITEMS 

• The sort program selects inventory for stock items that 
need to be reorderd. These are items for which the 
quantity on hand (AVAIL field) is less than or equal to 
the reorder point (REORD field). 

• Output records are to contain information needed to 
reorder the items. The information is in these fields: 
CLASS, ITEM, DESC, UNIT, COST, QTY, AVAIL, 
PDATE, VEND1, VEND2, and PORDER. 

• Output records are to be in ascending order by class 
(CLASS field) and by item numbers (ITEM field) with- 
in each class. 
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IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



Program 
Identification L 



GX 21 -9089 
Printed in U.S.A. 
75 76 77 78 79 80 



Card: MATCH, 
SORT, SELECT, 
MERGE 



" TO TIRI 



Largest sum 
(in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 11 



Stacker Select — 



Output 
Record 
Length 

29 30 31 32 



m 



CCP/Disk Sort Only 



or 



Record 



£| Length 



I 

i 41 42 43 144 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 



Record Type 



Line 


o 
< 

a 

7 


=> 

3 

o 

8 


Factor 1 


R 




Factor 2 (Field, Constant, or Keyword) 


Comments 


Number 
3 4 5 


g 

6 


9 




EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


O 

19 




29 




~1 

Record I 
Name | 

I 

40 41 42 43 44 45 46 47 1 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


Loca 
From 

10 11 12 


tion 

To 
13 14 15 16 


< Key wo 

Loc 

From 
20 21 22 23 


d — H 

To 1 
24 25 26 27l 28 


30 31 32 33 34 35 36 37 38 39 





1 




I 











6 


9 






7 


¥ 


L 


£ 


F 






H 


9 






V 


























AVA 


1 


L 




FU> 




LESS 




OR 




EG 




70 




RE( 




FLD 





2 














































r 






































i 


















































O 


3 




















































































i 
i 





















































4 









































































































































5 




















































































i 
i 





















































6 




















































































i 
i 



















































Field 



Line 










Forced 

to § 

CJ t* 
17 18 1 


j Overflow 
= Field 
I Length 

9 20 21 22 


Reserved 

23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 3 


Comments 


Number 

3 4 5 6 


l> 

§1 

f § L 

£ § From 

7 8 9 10 11 


ocation 

To 

12 13 14 15 1 


Field 1 
Name 1 

40 41 42 43 44 45|48 47 48 49 50 51 52 53 54 65 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 





7 F 


Ud 




7 


it 


) 


ill I I I I I I I I I'l I I I I I 


c 


L 


Ai 


?S 


1 LL 


-A 


S 


s 




oi nm- 




JEVIELRV 




ETC 





8 F 


NC 




1 


\ 


J 


C Total— 1U Characters 


I 


T 


El 


r\ 


! PI 


10 


C 


K 




IlEM MUMlEg 












j 









9 F 


QCl 


1 


1 


m 


' 


\ 


_D 


E 


S( 


> 


> pi 


:f> 


C 


ft 


1 


17WC 


OF 


ITEM" 












1 


F 


DC 




ft 


i\ 




j 




_U 


i 


II 


r 


! \l\ 


U 


T\ 




i 


E 


MEASl/RE 




















1 


' F 


C c 


3 


§ 


M 


I 


A.Tn 


SI 


r 




cc 


)S 


T 




? 


^ 


i UNI 


r 




















— 


1 


' ' 


)C 


1 


I 


5t 


) 




_Q 


T 


V 






RE 


10 


R 


D 




QUANT/ 


TV 




















1 


3 F 


DC^ 


6 


9 


y\ 


f 


t (including VEND1, VEND2, 


A 


V 


A 


L 




Uf 


u 


r 


S 




A\ 


W 


LA 


RL 


E- 


• - 


GAL 


tOgDER 


1 


A F 


DC 


* 


1 


it 




7 and PORDER on page 02) 


@ 





Al 


r£ 




PI 


K? 


c 


H 


A 


at 


- on 


ER 


OATE 















Since there is not enough space on the first coding sheet 
for the last three fields, they are coded on a second sheet. 
To show the proper sequence for the last three fields, put 
a 02 in columns 1 and 2 of the second coding sheet. 
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I Business Machines Corporatio 













SEQUENCE SPECIFICATIONS 
Header 


1 _ 2 
Page[^2] 


Program 
Identif icatio 


75 76 77 78 79 80 

J I 1 1 1 1 1 


u. 


Job I 


I Card Match 


l?l 


|_| 


|y|l| I I CCP/Disk Sort Only I ' 
I cl c | | | 1 






I 



Field 



Line 
















Forced 








































Comments 


Number 

3 4 5 


s 

6 7 


> 

3 

Q Loca 

N 

y From 

8 9 10 11 12 


tion 

To 
13 14 15 1 


6 ■ 

17 1 


.2 

! o 

3 19 


Overflow 

Field 

Length 

20 21 22 


Reserved 
23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 3 


Field 1 
Name | 

40 41 42 43 44 45(46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 
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F D 
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Header Specification 

Columns 1-2 

01 identifies this sheet as the first sequence specifications 
sheet. 

Column 6 

H identifies the line as a header line. 

Columns 7-12 

SORTR identifies the job as a tagalong sort. 

Columns 13-17 

The control fields used to sort records in this job are 
CLASS and ITEM. The total of their lengths is 10, which 
is the entry for columns 13 through 17. 

Column 18 

The A stands for ascending order. Output records are to be 
sorted into ascending order by CLASS and ITEM fields. 

Columns 29-32 

The output records contain 1 1 fields, including two control 
fields (CLASS and ITEM) and nine data fields. Control 
fields are not being dropped (column 28 is blank). There- 
fore, the length of the output record is the total length 
(64) of all 11 fields described in field specifications. 

Column 36 

N in column 36 indicates that the sort program will create 
an empty output file if no records are found in the input 
file or if no records are selected for sorting, and will not 
issue message SORT-7724 NO INPUT RECORDS 
INCLUDED. 



Record Type Specifications 

Column 6 

I identifies the line as an include line. The input records 
described by the line are used by the sort program. All 
other input records are omitted. 

Column 8 

Both factor 1 and factor 2 fields are numeric positive 
fields. The D in column 8 causes zeros and blanks to be 
considered equal if leading zeros were not recorded. 

Columns 9-16, 17-18, and 20-27 

Inventory records for which the number of units available 
(AVAIL) is less than or equal to the reorder point 
(REORD) are selected: 

• Columns 9 through 16 identify the location of the 
AVAIL field (record positions 69 through 74). 

• Columns 20 through 27 identify the location of the 
REORD field (record positions 40 through 45). 

• Columns 17 and 18 define the comparison made be- 
tween the two fields. 



Column 19 

An F in column 19 indicates that factor 1 is compared to 
the field located by the entries in columns 20 through 27. 



Columns 40-72 

Columns 40 through 72 are comment columns. 

Field Specifications 

Column 6 

F identifies the lines as field specification lines. 
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Column 7 

The first two fields described (CLASS and ITEM) are 
normal control fields. The rest are data fields. All are 
included in the output record (column 28 of the header 
line is blank). 

The records are sorted into ascending order by the CLASS 
field. Within each class, the item number (ITEM field) are 
in ascending order. 







Sequence of Records 


CLASS Sequence 


ITEM Sequence 


in Sorted Output File 


Lowest class no. 


Lowest item no. 


Lowest class no. - Lowest item no. 




Next higher item no. 


Lowest class no. - Next higher item no. 




Third higher item no. 


Lowest class no. - Third higher item no. 




Highest item no. 


Lowest class no. - Highest item no. 


Each higher 


Lowest item no. 


Class no. - Lowest item no. 


class no. 


Next higher item no. 


Class no. - Next higher item no. 




Third higher item no. 


Class no. - Third higher item no. 




Highest item no. 


Class no. - Highest item no. 


Highest class no. 


Lowest item no. 


Highest class no. - Lowest item no 




Next higher item no. 


Highest class no. - Next higher item no. 




Third higher item no. 


Highest class no. - Third higher item no. 




Highest item no. 


Highest class no. - Highest item no. 



Column 8 

Zone and digit portions of all characters in all fields are 
used as they appear in the input records. 



Columns 9-16 

Columns 9 through 16 identify the locations of fields in the 
input records. 



Columns 40-72 

Columns 40 through 72 are comment columns. 
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SAMPLE JOB 2: PRODUCING A RELATIVE RECORD 
ADDRESS FILE FOR AN ENTIRE INVENTORY FILE 

• Assume that the inventory file is an indexed file. The 
ITEM field is the record key used in the index. (The 
record keys are in ascending order.) 

• This job creates a record address file containing relative 
record numbers of all records in the file. It sorts them 
into ascending order by the CLASS field. Within each 
class, addresses are also sorted into ascending order by 
ITEM field. 

• As a result of this job, inventory records can be pro- 
cessed consecutively in either of two ways: 

1. By using the file index, which is in ascending 
order by ITEM field. 

2. By using the record address file created by the sort 
program, which is in ascending order by CLASS 
and also by ITEM within each class. 



IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



,03] 



GX21-9089 
Printed In U.S.A. 
75 76 77 78 79 80 



n 



Card: MATCH, 
SORT. SELECT, 
MERGE 



Disk: SORTR, 
SORTA, SORTRS 



jsmMnram 



Largest sum 
(in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 



Stacker Select = 



Output 
Record 
Length 

29 30 31 32 



CCP/Disk Sort Only 



8.5 



Record 
Length 



40 41 42 43 |44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 



Record Type 



Line 


o 
3 

1 
<§ 

7 


3 

3 

N 
8 


Factor 1 


R 


el. 


Factor 2 (Field, Constant, or Keyword) 


Comments 


Number 

3 4 5 


5 

1 

6 




EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


u 

LL 
19 




ista 
29 




~1 

Record ' 
Name 

40 41 42 43 44 45 46 47 1 4B 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


S' 

■51 

i: 

si Lo" 

1 From 
9 ilO 11 12 


tion 
To 
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^ Keywo 
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" "1 

ition | 
To 1 

24 25 26 27J28 
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Line 


i 

ii 

8 
















Forced 










































Comments 


Number 
3 4 5 


C 

c 

|" 

t- i- 

6 


Loca 

From 
9 10 11 12 


tion 
To 

13 14 15 1 


s 

1 
! 

oz 
17 


5 
1 
ja 

A 

18 


| 
19 


Overflow 

Field 

Length 

20 21 22 


Reserved 
23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 


Field I 
Name 1 

40 41 42 43 44 45|46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 
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( 
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Header Specification 

Column 6 

H identifies the line as a header line. 



Record Type Specifications 

Because all input records are being used and all have the 
same field specifications, no record type specifications 
are needed (include-all is implied). 



Columns 7-12 

SORTA identifies the job as an addrout sort. 

Columns 13-17 

The control fields used to sort relative record numbers in 
this job are CLASS and ITEM. The total of their lengths 
is 10, which is the entry for columns 13 through 17. 

Column 18 

The A stands for ascending order. The records are sorted 
into ascending order by item class (CLASS field), and by 
item number (ITEM field) within each class. 



Field Specifications 

Column 6 

F identifies the lines as field specification lines. 

Column 7 

Both fields (CLASS and ITEM) are normal control fields. 
The relative record numbers are sorted into ascending order 
by CLASS field and by ITEM field within each class: 







Sequence of Records 


CLASS Sequence 


ITEM Sequence 


in Sorted Output File 


Lowest class no. 


Lowest item no. 


Lowest class no. - Lowest item no. 




Next higher item no. 


Lowest class no. - Next higher item no. 




Third higher item no. 


Lowest class no. - Third higher item no. 




Highest item no. 


Lowest class no. - Highest item no. 


Each higher 


Lowest item no. 


Class no. - Lowest item no. 


class no. 


Next higher item no. 


Class no. - Next higher item no. 




Third higher item no. 


Class no. - Third higher item no. 




Highest item no. 


Class no. - Highest item no. 


Highest class no. 


Lowest item no. 


Highest class no. • Lowest item no 




Next higher item no. 


Highest class no. - Next higher item no. 




Third higher item no. 


Highest class no. - Third higher item no. 




Highest item no. 


Highest class no. - Highest item no. 



7-8 



Column 8 

C means that both zone and digit portions of the charac- 
ters in the CLASS control field are used in the sorting 
process. 



SAMPLE JOB 3: PRODUCING A FILE OF INVENTORY 
INFORMATION ABOUT CERTAIN ITEMS 

• The sort program selects inventory records for stock 
items in classes 01 26 through 01 30. 



D means that only the digit portions of the characters in 
the ITEM control field are used in the sorting process. 
This causes blanks to be treated as zeros. 



Output records are to contain only inventory informa- 
tion that indicates the activity (transactions) involving 
the stock items. The information is in these fields: 
ITEM, CLASS, TRANS, and ISSUES. 



Columns 9-16 

The CLASS control field is located in positions 7 through 
10 of the input records. 



Output records are to be sorted in ascending order by 
class (CLASS field), and in descending order by number 
of transactions (TRANS field) within each class. 



The ITEM control field is located in positions 1 through 6 
of the input records. 



IBM 
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Header Specification 

Column 6 

H identifies the line as a header line. 

Columns 7-12 

SORTR identifies the job as a tagalong sort. 



Columns 13-17 

The control fields used to sort records in this job are 
CLASS and TRANS. The total of their lengths is 7, which 
is the entry for columns 13 through 17. 



Record Type Specifications 

Column 6 

I identifies the record type lines as include lines. The input 
records described by these lines are used by the sort pro- 
gram. All other input records are omitted. 

Column 7 

The A in column 7 of line 02 means that line 02 is a con- 
tinuation of the definition of the record described in line 
01. The A means AND. An input record must meet all 
conditions listed in lines 01 and 02 before it is included. 

Column 8 



Column 18 

The A stands for ascending order. One control field 
(CLASS) is defined as a normal control field in field specifi- 
cations. The other control field (TRANS) is an opposite 
control field. The records, therefore, are sorted into 
ascending order by item class (CLASS field), and into 
descending order by number of transactions (TRANS 
field) within each class. 



Column 28 

X indicates that control fields are being dropped from the 
output records because the TRANS field is an opposite 
control field. The sort program must convert the informa- 
tion from the TRANS field into a special form so that the 
records can be sorted properly. The sort program does not 
return the information to its original form after sorting. 
The information, therefore, would be meaningless. 

The information from these two fields, however, is neces- 
sary in the output records. Therefore, the fields are also 
defined as data fields (see the explanation of column 7 of 
the field specifications for this example). 



D in column 8 of lines 01 and 02 means that the digit por- 
tions of the characters in positions 7 through 10 of the 
records (factor 1) are compared with the digit portions of 
the constants 0126 and 0130 (factor 2). Leading blanks in 
positions 7 through 10 are treated like zeros. Therefore, 
b126 (b is a blank) and 0126 are considered equal. 



Columns 9- 16, 17-18, and 20-39 

Inventory records that indicate the activity (transactions) 
of stock classes 0126 through 0130 are to be selected: 

• Columns 9 through 16 (factor 1) identify the location 
of the CLASS field (record positions 7 through 10). 
The CLASS field contains four-digit class numbers. 

• Columns 20 through 23 list constants (C in column 19), 
which in this example define the upper and lower limits 
of the classes being selected from the inventory file. 

• Columns 17 and 18 define the relationship between the 
input record field being used to build the file (factor 1) 
and the constants in factor 2. All inventory classes 
greater than or equal to (GE) 01 26 and less than or 
equal to (LE) 0130 are to be included in the sorted file. 



Columns 29-32 

Because control fields are dropped from the output records, 
the length of the output records is the total length of the 
fields defined as data fields in field specifications. The 
length is 19, which is the entry in columns 29 through 32. 



Column 19 and Columns 20-39 

C in column 19 indicates that factor 1 is compared to a 
constant in columns 20 through 39. The constant in line 
01 is 0130. The constant in line 02 is 0126. 
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Field Specifications 

Column 6 

F in column 6 of lines 07 through 12 indicates that the 
lines are field specification lines. 

Column 7 

Column 7 indicates the types of fields being described. The 
fields described in lines 07 and 08 (CLASS and TRANS, 
respectively) are control fields. CLASS is a normal control 
field. TRANS is an opposite control field. Output records 
are sorted so that CLASS fields are in the order indicated 
in column 18 of the header specifications (ascending order). 
Records having the same CLASS field are in descending 
order according to the TRANS field. 

The fields described in lines 09 through 12 are data fields. 
They are included in the output record but have no effect 
on the sequence of the records. 

Note that the CLASS and TRANS fields are described once 
as control fields and once as data fields because TRANS is 
an opposite control field. Its contents in the control field 
portion of the output records are changed in the sorting 
process and are meaningless for later processing. There- 
fore, the control fields are dropped from the output 
records (X in column 28 of the header specifications), and 
CLASS and TRANS are defined as data fields so that they 
still appear in the output records. 



The form of the output record is as follows: 



ITEM 


CLASS 


TRANS 


ISSUES 


1" -6 


7-" -10 


\\-+ -13 


14^ -19 



Positions 



Column 8 

C in column 8, line 07, and in column 8, lines 9 through 
12, means that both the zone and digit portions of all 
characters in all fields are used as they appear in the input 
records. D in column 8, line 08, means that only the digit 
portions of the characters in the TRANS control field are 
used in the sorting process. 



Columns 9-16 

Columns 9 through 16 identify the locations of fields in 
the input records. 
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SAMPLE JOB 4: PRODUCING A HISTORY FILE OF 
TRANSACTION INFORMATION 

• The sort program selects records for all transactions in 
the transaction file. 

• The entire file of input records is used to create output 
records. The output records are used to produce a 
history of the activity involving various stock. 

• Output records are sorted by record type: RECEIPT 
records first, ISSUE records second, and ADJUST 
(adjustment) records last. Each type of record is sorted 
into ascending order by item number (ITEM field). The 
ISSUE records also have a subcontrol field— DATE OF 
ORDER. 
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Header Specification 

Column 6 

H identifies the line as a header line. 

Columns 7-12 

SORTR identifies the job as a tagalong sort. 

Columns 13-17 

Three types of records are described: one on each sheet. 
The total length of the control fields for each type of 
record is 7, 13, and 7 characters, respectively. The largest 
of these totals (13) is the entry used in columns 13 
through 17. 

Column 18 

The A stands for ascending order. It indicates the order 
into which output records (described in the three sets of 
field lines) will be sorted. 

Columns 29-32 

The total length of control fields for each type of record 
described is 7, 13, and 7 respectively. The total length of 
data fields for each type of record is 20, 26, and 16 respec- 
tively. The largest control-field total (13) is added to the 
largest data-field total (26) and the result (39) is used in 
columns 29 through 32. 

Record Type Specifications 
Column 6 



Column 8, Columns 9-16, Columns 17-18, Column 19, and 
Columns 20-39 

Column 8 in line 01 of each of the three sheets contains a 
C indicating that the entire character in position 1 of the 
input records is to be compared with the constants R, I, 
and A respectively. Only input records with one of those 
characters in position 1 will be included in the job. 

In the record type lines, columns 9 through 39 have the 
following meanings: 

• Column 9 through 16 identify the input-record position 
(Position 1) being compared against R, I, and A. 

• Columns 17 and 18 indicate the comparison result that 
determines whether an input record is used (the charac- 
ter in position 1 must equal R, I, or A). 

• C in column 1 9 of each line indicates that the characters 
with which the input-record character is compared are 
constants supplied in columns 20 through 39. 

• Columns 20 through 39 supply the constants (R, I, and 
A, respectively) used in the comparison. 



Field Specifications 

Field specifications differ for the three types of records 
being described. The records, therefore, are described on 
separate coding sheets. 



Column 6 

F in column 6 of lines 07 through 12 on sheet 01, lines 
07 through 14 on sheet 02, and lines 07 through 12 on 
sheet 03 indicate that the lines are field lines. 



Column 6 in line 01 of each of the three sheets contains 
an I indicating that the lines are include lines. The input 
records described by these lines are used by the sort pro- 
gram. All other input records are omitted. 
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Column 7 

Column 7 indicates the types of fields being described for 
each of the three types of records. The records described 
by sheets 01 and 03 (RECEIPT and ADJUST records re- 
spectively) have two control fields. The records described 
by sheet 02 (ISSUE records) have three. The remaining 
fields described are data fields. 

These diagrams show the formats of the output records 
that will be created from each of the three types of input 
records. The number underneath the field identification 
blocks indicate the positions information will occupy in the 
output record. 
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The first control field in each type of output record is a 
forced control field. The number 1 will begin every 
RECEIPT output record, 2 will begin ISSUE records, and 
3 will begin ADJUST records. This forces all RECEIPT 
output records to be first, all ISSUE records second, and 
all ADJUST records third. 

The output records for this job must be the same length. 
The total number of characters in the control fields de- 
scribed for RECEIPT and ADJUST was less than the total 
for ISSUE records (the control field length for ISSUE on 
the header is used to assign the absolute length of the con- 
trol field). Therefore, the sort program added binary zeros 
at the end of the control fields for RECEIPT and ADJUST 
output records. Blanks were added at the end of the data 
portion of RECEIPT and ADJUST output records to make 
the total length of the records equal to the total length of 
ISSUE output records. 



Column 8 

C means that both zone and digit portions of the charac- 
ters in the fields are used. D means that only the digit 
portions of the characters in the ITEM control field are 
used in the sorting process. 



Columns 9-16 and Column 18 

Column 9 through 16 of the field lines identify the loca- 
tions of the fields in the input records. 

The first control field for each type of record is a forced 
control field. On each sheet, it is described by an uncon- 
ditional force line. For this reason, columns 9 through 
16 are blank in those lines. Column 18 identifies the 
character to be used in the forced control field: 1 in out- 
put records created from RECEIPT records, 2 in ISSUE 
output records, and 3 in ADJUST output records. 
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SAMPLE JOB 5: PRODUCING A LIST OF INVENTORY 
ITEMS REQUIRING ADJUSTMENTS 

• The sort program selects all adjustment records in the 
transaction file. 

• The output record is a control field consisting of the 
stock item number only. 

• Since the output record consists of no data field and, 
in particular, no summary data fields, the result of the 
SORTRS job will be to eliminate all duplicate adjust- 
ment stock item numbers from the sorted file. 

• The output records, each consisting of a unique stock 
item number that had an adjustment, are to be in 
ascending order. 

• The output provides a list of all stock items that had an 
adjustment. 
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Header Specification 

Column 6 

H identifies the line as a header line. 



Column 7 

Line 01 is the first (and only) include line of this include 
set consisting of lines 01 and 07. Therefore, column 7 
must be blank. 



Columns 7-12 

SORTRS identifies the job as a summary sort. 

Columns 13-17 

Only one control field is used in this job: ITEM. Its length 
is 6, which is the entry for columns 13 through 17. 

Column 18 

The A stands for ascending order. 

Columns 29-32 

The output record consists of one control field only. The 
output record length is 6, the same as the control field 
length. 

Record Type Specifications 

Column 6 

I identifies the record type line 01 as an include line. Input 
records described by this line are to be sorted. Since this 
is the only include set, all other records are omitted. 



Column 8 

C in column 8 tells the sort program to use both the zone 
and digit portions of the factor 1 and factor 2 fields de- 
scribed in line 01. 



Columns 13-16, 17-18, 19, and 20 

Only adjustment records containing an A in position 1 are 
to be included in the sort. 



Field Specifications 

Column 6 

F in column 6 of line 07 indicates that this is a field speci- 
fication line. 

Columns 7 and 8 

NC in columns 7 and 8 of line 07 indicates that the ITEM 
field described is a normal control field consisting of both 
the zone and digit portions of the characters in the ITEM 
field of the input records included in the sort. 

Columns 9-1 6 

Columns 9 through 16 of line 07 identify the location of 
the ITEM field (having a length of 6) that is to be used as 
the control field. 
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SAMPLE JOB 6: PRODUCING A SUMMARY HISTORY 
FILE OF ISSUES BY CUSTOMER NUMBER 

• The sort program selects all ISSUE records from the 
transaction file. 

• A summary sort (SORTRS) is used to create a file con- 
sisting of each customer to whom any stock item was 
issued. 

• Each output record consists of a unique customer num- 
ber, the total number of issues made to that number, 
and the total dollar value of all the issues. 

• The output records are to be in ascending order by 
customer number. 
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Header Specification 

Column 6 

H identifies the line as a header line. 

Columns 7-12 

SORTRS identifies the job as a summary sort. 



Columns 13-17 

The work record as well as the output record consists of a 
control field made up of the customer number. Its length 
is 7, which is the entry for columns 13 through 17. 



Column 18 

The A indicates that the control field is to be sorted in 
ascending order. 



Columns 29-32 

The control field is not to be dropped when the sort pro- 
gram is writing the output file. The length of the output 
record is the control field (7 characters as specified in line 
07) added to the data fields (16 characters as specified in 
lines 08 through 14). This totals 23 characters, and is the 
entry for columns 29 through 32. 



Field Specifications 

Column 6 

F in column 6 of lines 07 through 14 indicates that these 
lines are field lines. 

Columns 7 and 8 

NC in line 07 specifies that this is the control field to be 
sorted in the sequence specified in column 18 of the header 
line (ascending order) using both the zone and digit por- 
tions of the characters. 

Lines 08, 09, 1 1, and 12 specify unconditional 1 -character 
force fields. 

Line 10 indicates that this is a summary data field. When 
the data in the input record (positions 40 through 42) is 
used to build a work record, only the digit portions of the 
characters will be used because CON1 is an unsigned deci- 
mal number. Using a D in column 8 with a signed number 
causes the absolute value of that signed number to be used. 

Line 13 also is specified as a summary data field. However, 
U in column 8 indicates that this is signed zoned decimal 
data. The sign is to be moved to the work record and used 
in subsequent summary additions. 

Line 14 is specified as the summary overflow indicator 
byte. 



Record Type Specifications 

Column 6 

I identifies the record type line 01 as an include line. Input 
records described by this line are to be sorted. Since this is 
the only include set, all other input records are omitted. 

Column 7 

Line 01 is the first (and only) include line of this include 
set consisting of lines 01 through 14; therefore, column 7 
must be blank. 



Columns 9-16 

Entries are placed in the From and To columns for lines 
07, 10, and 13 to indicate the control field (CUST), digit 
summary data field (CON1), and the signed zoned decimal 
summary field (COST), respectively. 

For lines 08,09, 11, and 12, the entries are blank because 
these are unconditional 1 -character force fields. 

For line 14, the entries are blank because this line is an 
overflow indicator specification. 



Column 17 



Columns 8, 16, 17-18, 19, and 20 

Only ISSUE records containing the full character I in 
position 1 of the input records are to be included in the 
sort. 



The X in line 14 defines the field as an overflow indicator 
field. 
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Column 18 

This column is only used for lines 08, 09, 11, 12, and 14. 
The line numbers and the forced value in the data fields 
are: 



08 


\b (blank) 


09 


# 


11 


tf (blank) 


12 


$ 


14 


tf (blank) 



The initial work record created from the ISSUE records 
will look like this: 



Control Field 



Data Field 
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CON 1 
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COST 







Positions 
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13 
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23 


1 
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10 




12 


15 




22 



Since this is a summary sort, the CON1 and COST fields 
will be summarized for records having identical control 
fields (CUST). These portions 10 through 12 (CON1) in 
the work records will be summarized to reflect the total 
number of issues (TNUMB) for a given customer number. 
Likewise, positions 15 through 22 (COST) will be sum- 
marized to reflect the total cost of all issues (TCOST). 

The output record will look like this: 



CUST 
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ft 
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A blank in position 23 indicates that TNUMB and TCOST 
are valid sums. X in position 23 indicates that overflow 
occurred when the sort program was summarizing TNUMB 
and/or TCOST for this customer number, resulting in an 
invalid sum or sums. 
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SAMPLE JOB 7: SORTING SUMMARY HISTORY FILE 
BY DESCENDING TOTAL DOLLARS ISSUED 
(NEGATIVE VALUES POSSIBLE) 

• The input for this job is the output file created by 
Sample Job 6. Each input record has the following 
format: 



Record 
Position 


Field 
Name 


Contents 


1-7 


CUST 


Customer number 


8-9 




Constants: 0# 


10-12 


TNUMB 


Total number of issues to 
customer 


13-14 




Constants: 0$ 


15-22 


TCOST 


Total cost of all issues to 



23 



customer 

OF LOW Overflow indicator: 

IS- TNUMB and TCOST are 
valid sums 

X — Invalid sum or sums; 
overflow occurred 
while the sort program 
was summarizing 
TNUMB and/or TCOST 



Only records with valid TNUMB and TCOST will be 
used. 

A record sort of the valid records is desired; that is, the 
format of the output record is to be identical to the 
format of the input record. 

The records are to be sorted by total dollars issued 
(TCOST) in descending order. TCOST could be nega- 
tive for some customer numbers. For this reason, a sort 
that considers the sign must occur. 
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Header Specification 

Column 6 

H identifies the line as a header line. 

Columns 7-12 

SORTR identifies the job as a tagalong sort. 



Record Type Specifications 

Columns 6 and 7 

Two record types are specified. One type is to be omitted 
(0 in column 6). One is to be included. Each record type 
is specified by one record type line. Since these lines are 
the first (as well as the last) record type lines in their omit 
set and include set, column 7 must be blank. Note that the 
asterisk in column 7, line 03, indicates that this line is only 
a comment line. 



Columns 13-17 

One type of record is specified to be included. The total 
length of the control fields for this type is 8 (the entry in 
column 17). 



Columns 8, 9-1 6, 17-18, 19, and 20-39 

For line 01, these columns specify that if position 23 in 
the input record contains the character constant X, the 
record is to be omitted. 



Column 18 

D stands for descending order. The largest positive number 
comes first; the largest negative number (the negative num- 
ber having the largest absolute value) comes last. 

For example, the absolute values of -19 and -99 are 19 and 
99. -99 is more negative than -19 because its absolute 
value is greater than 19. 



Line 02 indicates that all records not omitted by line 01 
are to be included. For each record included, a work 
record is formed by the field specifications lines 07 and 08. 
Note that the control field is an eight-position zoned field 
(line 07). 

For a more complete discussion of numeric data, see 
Column 8 and Columns 9-16 under Column Descriptions 
in Chapter 3. 



Column 28 

X indicates that the control field is to be dropped when 
the output file is created. 



Columns 29-32 

When the control field is dropped, only the data portion 
remains. This data portion is the entire input record. Thus, 
23 is entered in columns 29 through 32. 



Field Specifications 

Column 6 

F in column 6 of lines 07 and 08 indicates that these lines 
are field specification lines. 



Columns 7, 8, 9-16, and 18 

• Line 07 indicates unpacked data in the control field 
from positions 15 through 22 of the input record. 
(This control field is dropped because an X is coded in 
column 28 of the header specifications.) 

• Line 08 indicates that the entire record is included 
as data. 
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Appendix A. Calculating the Sizes of Files for Sort 



INPUT FILE 

Use this formula to calculate the size (in blocks) of an input 
file; round the result up to the nearest whole number. 



number of records 
in the file 



x input record length 



BLOCKS = 



number of bytes in a block (2,560) 



OUTPUT FILE 

Use this formula to calculate how many blocks the output 
file requires; round the result up to the nearest whole 
number. 



BLOCKS = 



number of records that output 

will be selected for sorting record length 

number of bytes in a block (2,560) 



If you use the RECORDS parameter in the output file 
statement: 



RECORDS = 



WORK FILE 



number of records that 
will be selected for sorting 



Use either of the following formulas to approximate how 
many blocks or records to specify on the FILE statement 
for the work file; whichever formula you use, round your 
results up to the nearest whole number. 



Note: The sort program includes an 8-byte work block vec- 
tor in every work block written to the work file. There- 
fore, the work file must be larger than a file that would 
hold the exact number of records to be sorted. This is why 
both formulas approximate the number of records or 
blocks to specify on the FILE statement for the work file. 



Work Record Length 



Type of 






Sort 


Type of Output 


Work Record Length 


SORTA 


Address output 


Length of control fields + 3 


SORTR 


Control fields 


Length of control fields as 


or 


only 


specified in the header line 


SORTRS 








Control fields 


Length of data + length 




and data 


of control fields (output 
record length specified 
in the header line) 




Data only 


Length of data + length of 
control fields (output 
record length specified in 
the header line + the con- 
trol field length specified 
in the header line) 



BLOCKS = 2 + 



number of records that work 

x x 

will be selected for sorting record length 



1.1 



number of bytes in a block (2,560) 



or 



RECORDS = 



number of records that 
will be selected for sorting 



2 x 



number of bytes in 
a block (2,560) 



work record length 
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Appendix B. Collating Sequence 



Standard EBCDIC Collating Sequence 


When Both Zone and Digit Portions of 
Characters are Used 


When Only the Zone Portion of 
Characters is Used 


When Only the Digit Portion of 
Characters is Used 


Order 
in the 
Sequence 1 


Character 


Corresponding 

Hexadecimal 

Number 2 


Order 
in the 
Sequence 1 


Character 


Corresponding 

Hexadecimal 

Number 2 


Order 
in the 
Sequence 1 


Character 


Corresponding 

Hexadecimal 

Number 2 


1 
(lowest) 


blank 


40 


1 
(lowest) 


4 

< 

( 

+ 
I 


4A 
4B 
4C 
4D 
4E 
4F 


1 
(lowest) 


blank 

& 

- (minus) 

{ 
} 



40 
50 
60 
CO 
DO 
F0 


2 


4 


4A 


3 


# 


4B 


4 


< 


4C 


5 


( 


4D 


6 


+ 


4E 


2 


! 

$ 

* 

) 


5A 
5B 
5C 
5D 
5E 
5F 


2 


/ 
a 

i 

A 
J 

\ 
1 


61 
81 
91 
A1 
C1 
D1 
E1 
F1 


7 


I 


4F 


8 


& 


50 


9 


! 


5A 


10 


$ 


5B 


11 


* 


5C 


12 


) 


5D 


3 


/ 
i 

% 

(underscore) 
> 
? 


61 
6A 
6B 
6C 
6D 

6E 
6F 


13 


; 


5E 


14 


— i 


5F 


3 


b 

k 

s 

B 

K 

S 

2 


82 
92 
A2 
C2 
D2 
E2 
F2 


16 


- (minus) 


60 


17 


/ 


61 


15 


i 
i 


6A 


18 


, 


6B 


19 


% 


6C 


20 


(underscore) 


6D 


4 


\ 

# 
@ 

(apostrophe) 


79 
7A 
7B 
7C 
7D 

7E 
7F 


4 


c 
I 

t 
C 

L 
T 
3 


83 
93 
A3 
C3 
D3 
E3 
F3 


21 


> 


6E 


22 


? 


6F 


23 


\ 


79 


24 




7A 


25 


# 


7B 


26 


@ 


7C 


27 


(apostrophe) 


7D 


5 


a 
b 
c 
d 
e 
f 

g 

h 
i 


81 
82 
83 
84 
85 
86 
87 
88 
89 


5 


d 
m 
u 
D 
M 
U 
4 


84 
94 
A4 
C4 
D4 
E4 
F4 


28 


= 


7E 


29 


" 


7F 


30 


a 


81 


31 


b 


82 


32 


c 


83 


33 


d 


84 


6 


e 
n 

V 

E 
N 
V 
5 


85 
95 
A5 
C5 
D5 
E5 
F5 


34 


e 


85 


35 


f 


86 


6 


J 

k 

1 

m 

n 

o 

P 

q 

r 


91 
92 
93 
94 
95 
96 
97 
98 
99 


36 


g 


87 


37 


h 


88 


38 


i 


89 


39 


J 


91 


40 


k 


92 


7 


f 



w 
F 
O 
W 
6 


86 
96 
A6 
C6 
D6 
E6 
F6 


41 


1 


93 


42 


m 


94 


43 


n 


95 


44 


o 


96 


45 


P 


97 


46 


q 


98 


47 


r 


99 



1 When several characters share the same position in the sequence, they are considered equal. For example, if you are using only the 
digit portions of characters, b, k, s, B, K, S, and 2 (position 3) are considered equal. 

2 This is the number you use in ALTSEQ statements to identify a character that you want to shift to a different order in the 
sequence. 
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Standard EBCDIC Collating Sequence (cont'd.) 


When Both Zone and Digit Portions of 
Characters are Used 


When Only the Zone Portion of 
Characters is Used 


When Only the Digit Porti 
Characters is Used 


on of 


Order 
in the 
Sequence 1 


Character 


Corresponding 

Hexadecimal 

Number 2 


Order 
in the 
Sequence 1 


Character 


Corresponding 

Hexadecimal 

Number 2 


Order 
in the 
Sequence 1 


Character 


Corresponding 

Hexadecimal 

Number 2 


48 


~ 


A1 


7 


s 
t 
u 

V 

w 

X 

y 

z 


A1 
A2 
A3 
A4 
A5 
A6 
A7 
A8 
A9 


8 


g 

P 
x 
G 
P 
X 
7 


87 
97 
A7 
C7 
D7 
E7 
F7 


49 


s 


A2 


50 


t 


A3 


51 


u 


A4 


52 


V 


A5 


53 


w 


A6 


54 


X 


A7 


55 


y 


A8 


9 


h 

q 
y 

H 
Q 
Y 
8 


88 
98 
A8 
C8 
D8 
E8 
F8 


56 


z 


A9 


57 


{ 


CO 


8 


& 

{ 

A 
B 
C 
D 
E 
F 
G 
H 
I 


50 
CO 
C1 
C2 
C3 
C4 
C5 
C6 
C7 
C8 
C9 


58 


A 


C1 


59 


B 


C2 


60 


C 


C3 


61 


D 


C4 


62 


E 


C5 


10 


i 
r 

z 

I 

R 

Z 

9 


79 
89 
99 
A9 
C9 
D9 
E9 
F9 


63 


F 


C6 


64 


G 


C7 


65 


H 


C8 


66 


I 


C9 


67 


} 


DO 


68 


J 


D1 


9 


- (minus) 

} 
J 
K 
L 
M 
N 
O 
P 
Q 
R 


60 
DO 
D1 
D2 
D3 
D4 
D5 
D6 
D7 
D8 
D9 


69 


K 


D2 


70 


L 


D3 


11 



! 
i 


4A 
5A 
6A 
7A 


71 


M 


D4 


72 


N 


D5 


73 


O 


D6 


74 


P 


D7 


12 


$ 

# 


4B 
5B 
6B 
7B 


75 


Q 


D8 


76 


R 


D9 


77 


\ 


E0 


78 


S 


E2 


13 


< 

* 

% 
@ 


4C 
5C 
6C 
7C 


79 


T 


E3 


10 


\ 
S 
T 
U 
V 

w 

X 
Y 

z 


E1 
E2 
E3 
E4 
E5 
E6 
E7 
E8 
E9 


80 


U 


E4 


81 


V 


E5 


82 


w 


E6 


14 


( 
) 

(underscore) 
(apostrophe) 


4D 
5D 
6D 

7D 


83 


X 


E7 


84 


Y 


. E8 


85 


z 


E9 


86 





F0 


87 


1 


F1 


88 


2 


F2 


11 

(highest) 


blank 

1 
2 
3 
4 
5 
6 
7 
8 
9 


40 
F0 
F1 
F2 
F3 
F4 
F5 
F6 
F7 
F8 
F9 


15 


+ 
> 


4E 
5E 
6E 
7E 


89 


3 


F3 


90 


4 


F4 


91 


5 


F5 


92 


6 


F6 


16 
(highest) 


1 

— i 

? 


4F 
5F 
6F 
7F 


93 


7 


F7 


94 


8 


F8 


95 
(highest) 


9 


F9 



1 When several characters share the same position in the sequence, they are considered equal. For example, if you are using only the 
digit portions of characters, b, k, s, B, K, S, and 2 (position 3) are considered equal. 

2 This is the number you use in ALTSEQ statements to identify a character that you want to shift to a different order in the 
sequence. 



B-2 



STANDARD COLLATING SEQUENCE 

The Standard EBCDIC Collating Sequence chart shows the 
three standard collating sequences: 

• Standard collating sequence when both zone and digit 
portions of characters are used. 

• Standard collating sequence when only the zone portion 
of characters is used. 

• Standard collating sequence when only the digit portion 
of characters is used. 



ALTERNATE COLLATING SEQUENCE 

If you want to change the standard collating sequence, you 
must code an S in column 26 of the header specification 
and code ALTSEQ statements. You can code as many 
ALTSEQ statements as you need. Each one must begin 
with ALTSEQ and can contain a maximum of 96 positions. 

Note: Do not use a packed or zoned factor 1 in an include 
or omit record type specification (P or U in column 8) if 
you specify an alternate collating sequence. 



Coding Rules 

1 . Code ALTSEQ in the first six positions to tell sort 
you want to alter the standard collating sequence. 



IAILITISIEH 



Leave the next two positions blank. 



WLmsra 



Enter the hexadecimal equivalent 1 of the character 
you are taking out of its normal sequence. 



WL fflSIBQI I h n 



Enter the hexadecimal equivalent 1 of the value that 
the character specified in columns 9 and 10 is to 
assume in the collating sequence. 



lAlUTSlEfl l Ihlnlhln 



Enter as many pairs (from rules 3 and 4) as the num- 
ber of characters you are taking out of normal 
sequence. 

Leave no space between sets of hexadecimal numbers. 



UUUllSIEfl I hnhnh nhn 



When you reach the end of one statement, you can 
continue on the next specification line (follow rules 
1 through 6). 

Enter a double asterisk in positions 1 and 2 to indi- 
cate the end of the ALTSEQ statements. 



AiJSIQ 



AJLIS 



*«■ 



AklSEQ 



E9 



hnha 



bnDtt 



hn 



maximum of 96 positions 



-i — i — i — i — i — i — t- 



-i — i — i — i — y- 



maximum of 96 positions 
maximum of 96 positions 



See Standard EBCDIC Collating Sequence chart for hexadecimal 
equivalents of all characters. 



Input Order When ALTSEQ Statements Are Used 

ALTSEQ statements follow the header line. When you use 
an alternate collating sequence, your input must be in this 
order: 

1. OCL statements 

2. Sequence specifications 

a. Header line 

b. ALTSEQ statements 

c. ** 

d. Record type and field lines as required 

3. // END 

Programming Considerations 

When you move a character into the sequence position 
normally assigned to another character, both the new and 
the original character occupy the same position and are 
considered equal (see the first sample ALTSEQ statement). 
If you do not want the two characters to be equal, you 
must also move the character that normally occupies that 
position (see the second ALTSEQ statement). 
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Effect of ALTSEQ Statements on Other Coding 

ALTSEQ statements can change: 

• Factor 1 and factor 2 

• Normal and opposite control fields 

• Control field characters before they are replaced or 
added to by forced fields 

ALTSEQ statements never change data fields in records or 
forced control field characters. 

Sample ALTSEQ Statements 

To change the Sequence of One character 

ALTSEQ ALTSEQ 40F0 

Statements ** 

Explanation Blank (40) is moved to the position in the 
collating sequence occupied by zero (F0). 
Blanks and zeros, therefore, are considered 
equal. 

To Change the Sequence of Several Characters 

ALTSEQ ALTSEQ 5BC8C8C9C9D1 

Statements ** 

Explanation 5BC8 moves $ (5B) to the position occupied 
by H (C8). 

C8C9 moves H (C8) to the position 
occupied by I (C9). 
C9D1 moves I (C9) to the position 
occupied by J (D1). 

The $, therefore, has been inserted between 
G and H, as follows: 

A, B, C, D, E, F, G, $, H, I, (I and J occupy 
the same position). 

PROGRAMMING AIDS 

You can use a Translation Table and Alternate Collating 
Sequence Coding Sheet, GX21 -9096, to keep track of 
changes you make to your collating sequence. A sample 
sheet is included for your information. 
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International Business Machines Corporation 
TRANSLATION TABLE AND ALTERNATE COLLATING SEQUENCE CODING SHEET 








•No. of 


GX21-9096 U/M050' 

Printed in U.S.A. 

heets per pad may vary slightly 






Code 


Graphic 


Entry 


Replaced 
By /Takes 
Place Of 




Code 


Graphic 


Entry 


Replaced 
By /Takes 
Place Of 




Code 


Graphic 


Entry 


Replaced 
By/Takes 
Place Of 




Code 


Graphic 


Ent 


Replaced 
By/Takes 
Place Of 




Code 


Graphic 


Entry 


Replaced 
By/Takes 
Place Of 




00000000 




00 




00110011 




33 




01100110 




66 




10011001 


r 


99 




11001100 




CC 




00000001 




01 




00110100 




34 




01100111 




67 




10011010 




9A 




11001101 




CD 




00000010 




02 




00110101 




35 




01101000 




68 




10011011 




9B 




11001110 




CE 




00000011 




03 




00110110 




36 




01101001 




69 




10011100 




9C 




11001111 




CF 




00000100 




04 




00110111 




37 




01101010 


! 


6A 




10011101 




9D 




11010000 


} 


DO 




00000101 




05 




00111000 




38 




01101011 




6B 




10011110 




9E 




11010001 


J 


D1 • 




00000110 




06 




00111001 




39 




01101100 


% 


6C 




10011111 




9F 




11010010 


K 


02 




00000111 




07 




00111010 




3A 




01101101 


- 


6D 




10100000 




AO 




11010011 


L 


D3 




00001000 




08 




00111011 




3B 




01101110 


> 


6E 




10100001 


~ 


A1 




11010100 


M 


D4 




00001001 




09 




00111100 




3C 




01101111 


? 


6F 




10100010 


s 


A2 




11010101 


N 


D5 




00001010 




OA 




00111101 




3D 




01110000 




' 70 




10100011 


t 


A3 




11010110 





D6 




00001011 




OB 




00111110 




3E 




01110001 




71 




10100100 


u 


A4 




11010111 


P 


D7 




00001100 




oc 




00111111 




3F 




01110010 




72 




10100101 


V 


A5 




11011000 


Q 


D8 




00001101 




OD 




01000000 


Blank 


40 




01110011 




73 




10100110 


w 


A6 




11011001 


R 


D9 




00001110 




OE 




01000001 




41 




01110100 




74 




10100111 


x 


A7 




11011010 




DA 




00001 1 1 1 




OF 




01000010 




42 




01110101 




75 




10101000 


y 


A8 




11011011 




DB 




00010000 




10 




01000011 




43 




01110110 




76 




10101001 


z 


A9 




11011100 




DC 




00010001 




11 




01000100 




44 




01110111 




77 




10101010 




AA 




11011101 




DD 




00010010 




12 




01000101 




45 




01111000 




78 




10101011 




AB 




11011110 




DE 




00010011 




13 




01000110 




46 




01111001 


* 


79 


10101100 




AC 




11011111 




DF 




00010100 




14 




01000111 




47 




01111010 




7A 




10101101 




AD 




11100000 




EO 




00010101 




15 




01001000 




48 




01111011 


# 


7B 




10101110 




AE 




11100001 


\ 


E1 




00010110 




16 




01001001 




49 




01111100 


@ 


7C 




10101111 




AF 




11100010 


s 


E2 




00010111 




17 




01001010 


t 


4A 




01111101 




7D 




10110000 




BO 




11100011 


T 


E3 


;.:■;:•:.>■:;■ ■..:■;■:*" 


00011000 




18 




01001011 




4B 




01111110 


= 


7E 




10110001 




B1 




11100100 


u 


E4 




00011001 




19 




01001100 


< 


4C 




01111111 




7F 


10110010 




B2 




11100101 


V 


E5 




00011010 




1A 




01001101 


( 


4D 




10000000 




80 




10110011 




B3 




11100110 


w 


E6 




00011011 




1B 




01001110 


+ 


4E 




10000001 


a 


81 




10110100 




B4 




11100111 


X 


E7 




00011100 




1C 




01001111 


I 


4F 




10000010 


b 


82 




10110101 




B5 




11101000 


Y 


E8 




00011101 




1D 




01010000 


& 


50 




10000011 


c 


83 




10110110 




B6 




11101001 


z 


E9 




00011110 




IE 




01010001 




51 




10000100 


d 


84 




10110111 




B7 




11101010 




EA 




00011111 




1F 




01010010 




52 




10000101 


e 


85 




10111000 




B8 




11101011 




EB 




00100000 




20 




01010011 




53 




10000110 


f 


86 




10111001 




B9 




11101100 




EC 




00100001 




21 




01010100 




54 




10000111 


g 


87 




10111010 




BA 




11101101 




ED 




00100010 




22 




01010101 




55 




10001000 


h 


88 




10111011 




BB 




11101110 




EE 




00100011 




23 




01010110 




56 




10001001 


i 


89 




10111100 




BC 




11101111 




EF 




00100100 




24 




01010111 




57 




10001010 




8A 




10111101 




BD 




11110000 





FO 




00100101 




25 




01011000 




58 




10001011 




8B 




10111110 




BE 




11110001 


1 


F1 




00100110 




26 




01011001 




59 




10001100 




8C 




10111111 




BF 




11110010 


2 


F2 




00100111 




27 




01011010 


! 


5A 




10001101 




8D 




11000000 


{ 


CO 




11110011 


3 


F3 




00101000 




28 




01011011 


$ 


5B 




10001110 




8E 




11000001 


A 


C1 




11110100 


4 


F4 


iSSWSiSSSp 


00101001 




29 




01011100 


• 


5C 




10001111 




8F 




11000010 


B 


C2 




11110101 


5 


F5 


WMi&miK 


00101010 




2A 




01011101 


1 


5D 




10010000 




90 




11000011 


c 


C3 




11110110 


6 


F6 


WUKipM 


00101011 




2B 




01011110 




5E 


mmsmM 


10010001 


i 


91 




11000100 


D 


C4 




11110111 


7 


F7 




00101100 




2C 




01011111 


— ' 


5F 




10010010 


k 


92 




11000101 


E 


C5 




11111000 


8 


F8 


WSMSKSi 


00101101 




2D 




01100000 




60 




10010011 


1 


93 




11000110 


F 


C6 




11111001 


9 


F9 




00101110 




2E 




01100001 


1 


61 




10010100 


m 


94 




11000111 


G 


C7 




11111010 




FA 




00101111 




2F 




01100010 




62 




10010101 


n 


95 




11001000 


H 


C8 




11111011 




FB 




00110000 




30 




01100011 




63 




10010110 


o 


96 




11001001 


1 


C9 




11111100 




FC 




00110001 




31 




01100100 




64 




10010111 


p 


97 




11001010 




CA 




11111101 




FD 




00110010 




32 




01100101 




65 




10011000 


q 


98 




11001011 




CB 




11111110 




FE 




11111111 




FF 































Note: Not all graphic symbols shown here are available on all systems. 



mm 



Hexadecimal numbers of characters in the standard collating sequences. 

Where you record the hexadecimal number of the character you are going 
to put in that relative position in the sequence. 



B-6 



Appendix C. Header, Record Type, and Field Specification Column Summaries 



HEADER SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Entries 


Explanation 


1-2 


00-99 


Page number. 


3-5 


000 


Header line number. 


Ill|||lp|p||li; 


H 


Header line identification. 


7-12.- 


SORTA 


Addroutsort job. 


SORTR 


Tagalong sort job. 


SORTRS 


Summary tagalong sort job. 


injunum,,,,,,,,,, , 


1-256 


Largest sum (in bytes) of control field lengths for any record type. 


n • 


A 


Records in sorted file to be in ascending order by control fields. 


D 


Records in sorted file to be in descending order by control fields. 


S 


Not used in System/34 sort jobs. 


19-25 


. Blank 


Not used in System/34 sort jobs. 


26 


Blank 


Use standard collating sequence in compare operations. 


S 


Use an alternate collating sequence in compare operations. ALTSEQ 
statements will define the collating sequence to be used. 


27 


or Blank 


Print: Sequence specifications 
Diagnostic messages 
Program-status messages 

Display: Action messages 

Displayed messages 


1 


Print: Program-status messages 
Display: Action messages 

Displayed messages 


2 


Print: Action messages only 
Display: Displayed messages 


3 


Display: Displayed messages 


28 


Blank 
X 


Keep control fields in output records in tagalong sort jobs. 
Drop control fields from output records in tagalong sort jobs. 


V&W/////A 


1-4096 


Length of output records in tagalong sort jobs. 


33 


Blank 


Not used in System/34 sort jobs. 


34 


N 


Data written on the work file will not be verified. 


Blank or character 
other than N 


Data written on the work file will be verified. 


35 


Blank 


Reserved for system use. 


36 


Blank 


Operator message SORT— 7724 will be issued. 


N 


Operator message SORT— 7724 will not be issued. 


37-39 


Blank 


Not used in System/34 sort jobs. 


40-72 


Any characters 


Comments. 












Columns that must be filled in for all sort jobs. 










V//////A 


Columns that must be filled in for tagalong sort jobs. 
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RECORD TYPE SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Entries 


Explanation 


1-2 


00-99 


Page number. 


3-5 


01x-06x 


Line number. You can leave column 5 (x) blank, or enter any value to keep 
the specifications in ascending order. 


$ 


I 


Include line. 





Omit line. 


7 


Blank 


This is the first line of a set of I or O record type lines. 


A 


AND lines. These specifications continue the definition of the record 
described on the preceding line. 





OR line. These specifications define a different type of record than the one 
on the previous line. 


* 


Comment line. 




C 


Use both zone and digit portions of characters. 


z 


Use only zone portion of 1 -character field. 


D 


Use only digit portions of characters. 


P 


Signed packed decimal data. \ 


U 


Signed zoned decimal data. 


8-1$ 


1-4096 


The input record position in which the factor 1 field begins (blank if field is 
only one position long). 


13*16 " 


1-4096 


The input record position in which the factor 1 field ends. 


ifm ■■" 


EQ 


Factor 1 must equal factor 2. 


NE 


Factor 1 must not equal factor 2. 


LT 


Factor 1 must be less than factor 2. 


GT 


Factor 1 must be greater than factor 2. 


LE 


Factor 1 must be less than or equal to factor 2. 


GE 


Factor 1 must be greater than or equal to factor 2. 


10 


F 


Factor 2 is another field in the same input record. 


C 


Factor 2 is a constant. 


K 


Factor 2 is a keyword. 


20*23 


1-4096 


The input record position in which the factor 2 field begins (blank if field 
is only one position long). 


&W 


1-4096 


The input record position in which the factor 2 field ends. 


"K9 


Any characters 


The factor 2 constant. 


40-72 


Any characters 


Comments. 








;: : ;::- : i :: ; : }K : :.;-;''-::;:g:.:: : ;: : S:: :::.:;:■:• 


Columns that must be filled in. 
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FIELD SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Contents 


Explanation 


1-2 


00-99 


Page number. 


3-5 


07x-14x 


Line number. You can leave column 5 (x) blank, or enter any value to keep 
the specifications in ascending order. 


$ 


F 


Field specification line. 


.7 


N 


Normal control field. 





Opposite control field. 


F 


Forced control field. 


D 


Data field. 


S 


Summary data field. 


* 


Comment line. 


8 




C 


Use both zone and digit portions of characters in the field. 


z 


Use only zone portion of 1 -character field. 


D 


Use only digit portions of characters in the field. 


P 


Signed packed decimal data. 


U 


Signed zoned decimal data. 


V 


Force a data character into the data field. 


•$-.12 .: 




1-4096 - 


Start position of a field in the record (can be blank if the field is 1 character 
long). 


•'-.•ia«i6:"'"-" : y?'v.-: 


1-4096 


End position of a field in the record. 


ip 


§§ 


Any character 


Forced control fields; the character you want the sort program to change. 
Also used for summary overflow indicator fields; the character to be used 
for the oveflow indicator. 


y /%^ 


P 


Any character 


Forced control or data field; the character you want the sort program to 

substitute. 

Also used for summary overflow indicator fields; the character to which the 

overflow field is initialized. 


^ 


It 


Blank 


Forced control field line is not a continuation of the preceding line. 


Any character other 
than blank 


Forced control field line is a continuation of the preceding line. 


20-22 


1-256 


Overflow field length entry for summary tagalong sort only. 


23-39 


Blank 


Reserved for system use. 


40-72 


Any characters 


Comments. 










Columns that must be filled in for all sort jobs. 






y//////////. 


Columns that must be filled in when forced control fields are being used. 









Header, Record Type, and Field Specification Column Summaries C-3 



C-4 



Appendix D. Integer (Binary) and Real Number Sorting 



This appendix indicates how either positive and negative 
integers or positive and negative real numbers in control 
fields can be used to sort records in a file. 

Coded sequence specifications sheets for sample sort jobs 
are included, followed by a brief discussion of the entries 
made on the sheets. 

Note: For a detailed discussion of sequence specifications 
sheet entries, see Chapters 2, 3, 4, and 7. 



SAMPLE SORT JOB 1. SORTING ON A CONTROL 
FIELD THAT CONTAINS EITHER A POSITIVE 
INTEGER OR A POSITIVE REAL NUMBER 



T^)VJf International Business Machines Corporation 
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Header Specification 

Column 6 

H identifies the line as a header line. 



Record Type Specifications 

Because all input records are being used and all have the 
same field specifications, no record type specifications are 
needed (include-all is implied). 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 

Columns 13-17 

The control field that contains either a positive integer or 
a positive real number has a length of 4 (the entry in 
column 17). 

Column 18 

The A specifies ascending order. The smallest positive 
integer or positive real number comes first; the largest 
positive integer or positive real number comes last in the 
sort sequence. 



Field Specifications 

Column 6 

F identifies the lines as field specification lines. 

Columns 7, 8, and 9- 16 

Line 07 indicates that the control field is in positions 1 
through 4 of the input record. This control field is 
included in the sorted output file (column 28 of the header 
line is blank). 

Line 08 indicates that the other 60 input record characters 
are included as data in the sorted output file. 



Columns 29-32 

The control field is not dropped when data is written to 
the output file (column 28 is blank). Therefore, the length 
of the output record equals the length of the control field 
(4 bytes) added to the length of the data field (60 charac- 
ters) specified by lines 07 and 08. This output record 
length totals 64, which is the entry for columns 29 through 
32. 
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SAMPLE SORT JOB 2. SORTING ON A CONTROL 
FIELD THAT CONTAINS ONLY A POSITIVE OR 
NEGATIVE INTEGER 



IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 
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Program 
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Printed in U.S.A. 
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IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



_ . Program, 

Al identificati 



GX21 -9089-3 
Printed in U.S.A. 
75 76 77 78 79 80 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Disk: SORTR, 
SORTA, SORTRS 
Tape: SORTT 
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(in bytes) 
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-leader Specification 

Column 6 

H identifies the line as a header line. 

Columns 7-12 

50RTR identifies the job as a tagalong sort. 



Columns 13-17 

The total length of the control field (for either a positive 
or a negative integer) is 5 bytes (the entry in column 17). 



Column 18 

The A stands for ascending order. Since negative integers 
are stored in two's complement form, the smallest negative 
integer comes first; the largest positive integer comes last in 
the sort sequence (for example: -2, -1,0, 1, 2). 



Column 28 

X indicates that the control field is dropped when data is 
written to the output file. 



Columns 29-32 

When the control field is dropped, only the data portion 
remains. The data portion in this sample job is the entire 
input record. Therefore, 64 is entered in columns 29 
through 32. 

Record Type Specifications 

Column 6 

Two record types are specified (positive integers and nega- 
tive integers). Both record types are to be included (I in 
column 6 of line 01, pages 01 and 02). 



Columns 8, 9- 16, 1 7- 18, 19, and 20-39 

On line 01 (page 01), these columns specify that if position 
1 (the leftmost byte of the 4-byte control field from the 
input record) is less than or equal to the character constant 
" (see note), the work record will have a character 2 
forced into the first byte of its 5-byte control field (line 
07 on page 01). This include line selects only positive 
integers. Line 01 (page 02), which is an include-all line, 
indicates that all records not described by the first include 
line (page 01 ) are also included in the sort. The first 
include line (line 01 page 01) selects all positive integers; 
therefore, this include-all line (page 02) selects all negative 
integers, which will have a character 1 forced into the first 
byte of their work record control field (line 07 on page 02). 
All negative integers are forced in front of all positive inte- 
gers in the sort sequence. 

Note: The special character " has a bit configuration of 
01111111, which is equivalent to the high order byte of 
the maximum positive integer. 

Field Specifications 

Column 6 

F identifies the lines on pages 01 and 02 as field specifica- 
tion lines. 



Columns 7, 8, 9- 16, and 18 

On line 07 (pages 01 and 02), these columns specify that 
for positive integers (line 07 on page 01 ), a character 2 will 
be forced into the first byte of the work record control 
field; for negative integers (line 07 on page 02), a character 
1 will be forced into the first byte of the work record con- 
trol field. 

On line 08 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that the control field is in positions 1 through 4 
of the input records. (The control field is not included in 
the output records because header specification column 28, 
page 01, contains an X.) 

On line 09 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that 64 input record characters are included as 
data in the sorted output file. 
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SAMPLE SORT JOB 3. SORTING ON A CONTROL 
FIELD THAT CONTAINS ONLY A POSITIVE OR 
NEGATIVE REAL NUMBER 



■niff International Business Machines Corporation 
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IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



GX21 -9089-3 
Printed in U.S.A. 
75 76 77 78 79 80 



J I I I I I 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Disk: SORTR. 
SORTA, SORTRS 
Tape: SORTT 
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(in bytes) 
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Header Specification 

Column 6 

H identifies the line as a header line. 

Columns 7-12 

SORTR identifies the job as a tagalong sort. 



Columns 13-17 

The total length of the control field (for either a positive 
or negative real number) is 5 bytes (the entry in column 
17). 



Column 18 

The A stands for ascending order. The smallest negative 
real number comes first; the largest positive real number 
comes last in the sort sequence (for example: -2.0, -1 .0, 
0.0,1.0,2.0). 



Column 28 

X indicates that the control field is dropped when data is 
written to the output file. 



Columns 29-32 

When the control field is dropped, only the data portion 
remains. The data portion in this sample job is the entire 
input record. Therefore, 64 is entered in columns 29 
through 32. 



Columns 8, 9-16,1 7- 18, 19, and 20-39 

On line 01 (page 01), these columns specify that if position 
1 (the leftmost byte of the 4-byte control field from the 
input record) is less than or equal to the character constant 
" (see note), the work record will have a character 2 forced 
into the first byte of its 5-byte control field (line 07 on 
page 01). This include line selects only positive real 
numbers. Line 01 (page 02), which is an include-all line, 
indicates that all records not described by the first include 
line (page 01) are also included in the sort. The first 
include line (line 01 on page 01 ) selects all positive real 
numbers; therefore, this include-all line (page 02) selects 
all negative real numbers, which will have a character 1 
forced into the first byte of their work record control field 
(line 07 on page 02). All negative real numbers are forced 
in front of all positive real numbers in the sort sequence. 

Note: The special character " has a bit configuration of 
01111111, which is equivalent to the high order byte of 
the maximum positive real number. 



Field Specifications 

Column 6 

F identifies the lines on pages 01 and 02 as field specifica- 
tion lines. 

Columns 7, 8, 9-16, and 18 

On line 07 (pages 01 and 02), these columns specify that 
for positive real numbers (line 07 on page 01), a character 
2 will be forced into the first byte of the work record con- 
trol field; for negative real numbers (line 07 on page 02), a 
character 1 will be forced into the first byte of the work 
record control field. 



Record Type Specifications 
Column 6 



Two record types are specified (positive real numbers and 
negative real numbers). Both types are to be included (I in 
column 6 of line 01, pages 01 and 02). 



On line 08 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that the control field is in positions 1 through 4 
of the input records. Note that real numbers are always 
carried in true form (never in two's complement form). 
Therefore, sorting negative real numbers into ascending 
sequence requires them (when treated as character fields) 
to be sorted into descending sequence. The O in column 7, 
line 08 on page 02 indicates an opposite control field, 
which means that the negative real numbers will be sorted 
in descending sequence. 

On line 09 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that 64 input record characters are included as 
data in the sorted output file. 
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SAMPLE SORT JOB 4. RECORD SELECTION BASED 
ON BINARY VALUES 

To select records based on a binary value, use one or both 
of the following types of include sequences: 



Type 1 Include Sequence 

For binary values whose hexadecimal equivalents can be 
represented by one or two characters in the 64-character 
set (Appendix B, Standard EBCDIC Collating Sequence 
table), use either an include character (I and C in columns 
6 and 8 of the record type specifications) or an include 
zone (I and Z in columns 6 and 8 of the record type 
specifications) ANDed with an include digit (IAD in 
columns 6 through 8 of the record type specifications). 



Type 2 Include Sequence 

For binary values whose hexadecimal zone portions do not 
appear in the 64-character set, use two include specifica- 
tions for the zone portion ANDed with an include digit for 
the digit portion. 

Example: Select records that contain a value of 44 in posi- 
tion 2. The binary representation of this number is 
0010 1 100, which is a hex 2C. For the digit portion, select 
a character from the table in Appendix B with a digit por- 
tion of C (for example, <, *, %, and @). Use this character 
in an include line, comparing its digit portion to the binary 
value of 1 100. Because there is no character in the 64- 
character set whose zone portion is equivalent to 2, use two 
include lines to describe constants with a zone portion 
greater than 1 and less than or equal to 2. Describe these 
constants as packed, which reverses the zone and digit por- 
tions from hex F1 and F2 to hex 1 F and 2F. 
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Hexadecimal 


Binary 


Decimal 




Value 


Value 


Value 


Field to be selected 


2C 


= 0010 1100 = 


44 


Character @ 


7C 


= 0111 1100 = 


124 


Packed character 2 


2F 


= 00101111 = 


47 


Packed character 1 


1F 


= 0001 1111 = 


31 



The record type specifications shown will cause selection of 
all records containing (in column 2) a value between 31 
(hex 1 F) and 47 (hex 2F) whose digit portion is equal to C. 

Note: The 16 hexadecimal values whose zone portions 
are B cannot be accessed with these types of entries. 
Therefore, there can be no record selection based 
on these values. 



Sample Sort Job 4 Description 

The purpose of this sample job is to select records from an 
inventory file whose reorder point is 7800. The reorder 
point is a 2-byte quantity in columns 44 and 45 of the 
inventory records. The quantity is stored in binary (7800 = 
0001 11100111 1000), and the hexadecimal representation 
of this number is hex 1 E78. (Use the IBM System/34 Pro- 
gramming Reference Summary, GX2 1-7674, to help with 
binary and hexadecimal conversions.) 
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These specifications will cause selection of all records con- 
taining (in column 44) a value between 15 (hex OF) and 31 
(hex 1 F) whose digit portion is equal to E. They will 
further limit selection of records to those which have a 
binary value in column 45 whose zone portion equals 7 
and whose digit portion equals 8. Therefore, all records 
selected will have hex 1 E78 in columns 44 and 45. 



Header Specification 

Column 6 

H identifies the line as a header line. 

Columns 7-1 2 

SORTR identifies the job as a tagalong sort. 

Columns 13-17 

The total length of the control field is 6 bytes. 

Column 18 

The A stands for ascending order. The file will be sorted 
according to the standard collating sequence shown in 
Appendix B. 



Record Type Specifications 

Line 01 selects records whose digit portion in column 44 is 
E. Lines 02 and 03 select records whose packed value in 
column 44 is less than or equal to hex 1 F and, at the same 
time, is greater than a packed value of hex OF. 

The only hexadecimal values that satisfy both specifications 
for lines 02 and 03 are hex 1 1 through hex 1 F. Line 04 is a 
comment line. Lines 05 and 06 select records whose zone 
portion in column 45 is 7 and whose digit portion is 8. 



Field Specifications 

Column 6 

F identifies the lines as field specification lines. 

Columns 7, 8, and 9- 16 

Line 07 indicates that the control field is in positions 1 
through 6 of the input records. Only the digit portions 
of the characters will be used. This control field will be 
included in the output file. 

Line 08 indicates that the other 105 input record characters 
are included as data in the output file. 



Columns 29-32 

The control field is not dropped when data is written to 
the output file (column 28 is blank). Therefore, the length 
of the output record equals the length of the control field 
(6 bytes) plus the length of the data field (105 characters) 
specified by lines 07 and 08. This output record length 
totals 1 1 1, which is the entry for columns 29 through 32. 
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Appendix E. Sort Printed Messages 



This appendix describes sort programmer messages which 
are activated (or suppressed) by the print option in the 
header statement. These messages, if activated, are issued 
using the system list function which prints messages when 
the system list device is a printer and displays messages 
when the list device is a display station. See the SYSLIST 
statement in the System Support Reference Manual for 
details on assigning the system list device. For information 
on how to suppress sort programmer messages, see Column 
27 (Print Option) in Chapter 2. Sort displayed messages 
are described in the Displayed Messages Guide. 



The execution phase gets the records you want sorted, sorts 
the records, and writes the sorted records onto the output 
file in the order that you want them. 

Following is a typical sort diagnostic message as it appears 
on a listing. Note that a one-character alphabetic code, 
which indicates the significance of the message, follows the 
message identification code. 



SORT-7264 W 



SPECIFICATION IN WRONG 
NUMERICAL ORDER 



Sort printed messages are issued mainly during the genera- 
tion phase of the sort program. No operator action is 
required. Therefore, each message description in this 
section consists only of a simple explanation for the 
programmer. 

To understand these messages, you must have a basic under- 
standing of how the sort program works. Specifically, it is 
helpful to know what happens during the generation phase 
and during the execution phase. 



The codes and their significance are listed below. 



Code Meaning 
T Terminal 



Significance 

Processing cannot continue. The 
program ends immediately and no 
more processing is done. Sort 
displayed message SORT-7725 
follows and the operator must 
cancel the job. 



The generation phase translates your sequence specifications 
into machine language. 




Data Flow 



> 



Generation 
Phase 




Control Flow 



Execution 
Phase 



—7 Work 
/s^Y File 




W Warning 



Severe A sort sequence specification state- 

ment contains an error. When the 
generation phase is complete, sort 
displayed message SORT-7725 is 
issued and the operator must cancel 
the job. 

An error condition might exist. 
Corrective action is required if 
the condition is unintentional. 
When the generation phase is com- 
plete, sort displayed message 
SORT-7722 is issued. 

Action A condition exists that requires an 

operator response. A sort displayed 
message follows. 

Information For information only. Messages 

with an I code indicate the current 
status of the job. 
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SORT-7101 



PRINT OPTION ASSUMED 
TOBEO 



The print option in the header line is not blank, 0, 1, 
2, or 3. Therefore, it is assumed to be 0. 



SORT-7102 W 



SORT JOB ASSUMED TO 
BESORTR 



SORT-7150 



CONTROL FIELD 
DROPPED-NO DATA 
SPECIFICATIONS 



No data specifications (including summary specifications) 
were entered for this job, but the control field is being 
dropped. If the job were allowed to continue, the output 
file would contain all blanks. Add data field specifica- 
tions to the job and/or retain the control field; then 
resubmit the job. 



Neither SORTA, SORTR, or SORTRS job type is 
specified on the header line. Because an output record 
length is specified, SORTR is assumed. To avoid this 
error, correct columns 7 through 12 of the header line. 



SORT-7151 



CONTROL FIELD LENGTH 
NOTGIVEN 



SORT-7103 T 



SORT JOB TYPE NOT 
SPECIFIED 



Neither a job type nor an output record length is speci- 
fied in the header line. Place the proper job type in 
columns 7 through 12 of the header line. Resubmit the 
job. 



No control field length is specified on the header line 
for this job. Place the length of your control fields in 
columns 13 through 17 of the header line; then resub- 
mit the job. 



SORT-7152 S CONTROL FIELD LENGTH 
TOO LARGE 



SORT-7104 



FIRST STATEMENT 
NOT A HEADER 



The length specified for the control field is too large. 
A length of 256 is assumed. Specify a control field 
length of 256 or less in columns 13 through 17 of the 
header line; then resubmit the job. 



The first sort sequence specification statement is not a 
header statement or a valid SOURCE statement. Change 
your first sort sequence specification so it is either a 
header statement or a valid SOURCE statement. 



SORT-7154 W 



ASCENDING SEQUENCE 
ASSUMED A, COLUMN 18 



SORT-7105 W INVALID ENTRY, 
COLUMN 36 

Column 36 of the header line does not contain an N or 
a blank. A blank is assumed. To avoid this error next 
time the job is run, specify either N or blank in column 
36 of the header line. 



Column 18 of the header line contains neither D, for 
descending sequence, nor A, for ascending sequence. 
Ascending sequence is assumed. To avoid this error 
next time the job is run, specify either A or D in column 
18 of the header line. 



SORT-7155 W 



OUTPUT OPTION 
ASSUMED X, COLUMN 28 



Column 28 of the header line contains neither X nor 
blank. Output option X is assumed. To avoid this error 
next time the job is run, specify either X or blank in 
column 28 of the header line. 
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SORT-7156 S OUTPUT RECORD LENGTH 
NOT SPECIFIED 



SORT-7160 W 



ALTERNATE COLLATING 
SEQUENCE ASSUMED 



This is a SORTR or SORTRS job, but no output record 
length is specified on the header line. The maximum 
length of 4096 is assumed. Specify the length of the 
output records in columns 29 through 32 of the header 
line; then resubmit the job. 



Column 26 of the header line does not contain an S or 
a blank. Alternate collating sequence is assumed. If 
alternate collating sequence is not to be used, specify a 
blank in column 26 of the header line; then resubmit 
the job. If alternate collating sequence is correct, place 
an S in column 26 to avoid this occurring again. 



SORT-7157 S OUTPUT RECORD LENGTH 
TOO LARGE 

This is a SORTR or SORTRS job. The output record 
length specified in columns 29 through 32 of the header 
line is larger than 4096. The maximum length of 4096 
is assumed. Be sure the header line is not shifted by one 
or more columns. Specify an output record length of 
4096 or less; then resubmit the job. 



SORT-7161 



INVALID CONTROL 
FIELD LENGTH 



A nonnumeric character or an embedded blank was 
specified in columns 13 through 17 of the header line. 
Correct the entry, making sure that no nonnumeric 
characters or embedded blanks are specified; then resub- 
mit the job. 



SORT-7158 S OUTPUT RECORD LENGTH 
INCONSISTENT 



SORT-7162 T 



INVALID OUTPUT RECORD 
LENGTH 



This is a SORTR or SORTRS job and you are not drop- 
ping the control field. The output record length 
(columns 29 through 32) that includes the control field 
should not be less than the length of the control field 
(columns 13 through 17). Be sure you do not want to 
drop the control field. Recompute the output record 
length; correct the entry on the header line; then resub- 
mit the job. 



SORT-7159 S WORK RECORD LENGTH 
TOO LARGE 

The work record length for this job is too large. The 
maximum length of 4096 is assumed. Specify a work 
record length of 4096 or iess; then resubmit trie job. 
(See Appendix A for information on how to determine 
the work record length.) 



A nonnumeric character or an embedded blank was 
specified in columns 29 through 32 of the header line. 
Correct the entry, making sure that no nonnumeric 
characters or embedded blanks are specified; then 
resubmit the job. 



SORT-7176 S INVALID ALTERNATE 
SEQUENCE STATEMENT 

Column 26 of the header line specifies that an alternate 
sequence is to be used, but the statement just read is not 
a comment statement or a valid sort specification state- 
ment, nor does it contain ALTSEQtftf in columns 1 
through 8. Correct the incorrect statement or delete it 
if it decs net belong in the job; cr 2dd a valid alternate 
sequence statement. 
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SORT-7177 W 



MISSING THE DOUBLE 
ASTERISK (**) STATEMENT 



No statement containing asterisks (*) in columns 1 and 
2 was between the alternate sequence statement and the 
include, omit, or field specification statement. The 
sort program assumes an ** statement following the 
alternate sequence statement. To avoid this error next 
time the job is run, place an ** statement between the 
alternate sequence statement and the include, omit, or 
field specification statement. 



SORT-7202 S INVALID SPECIFICATION 
TYPE, COLUMN 6 

A specification is not identified in column 6 as a valid 
type of specification. Valid specification types are 
comments, include sets, omit sets, or field specifications. 
The specification is bypassed and the rest of the specifi- 
cations are processed. The specification was probably 
specified incorrectly or misplaced in the job. Correct 
the error; then resubmit the job. 



SORT-7204 W 



SORT-7178 S ALTSEQ STATEMENT HAS 
INVALID DATA 

An alternate sequence statement entry that is used to 
alter the normal sequence is in error. One of the four- 
position groups (columns 9 through 12, 13 through 16, 
and so on) in the ALTSEQ statement does not contain 
a valid hex character (0 through 9 or A through F). An 
asterisk (*) flags the columns in error on the source 
listing. Processing continues with the next four-position 
group. Correct the incorrect alternate sequence state- 
ment; then resubmit the job. 



BLANK CONTINUATION 
ASSUMED, COLUMN? 



A nonblank character is specified in column 7 of a 
specification that is the first in an omit or include set; 
a blank is expected. The sort program assumes a blank 
in column 7. To avoid this message, leave column 7 
blank. 



SORT-7206 



INVALID CONTINUATION, 
COLUMN? 



SORT-7179 



UNEXPECTED END OF 
FILE FOUND 



An end-of-file statement followed the alternate sequence 
statement. No comment statement or ** statement 
exists. Check that the last part of the sequence specifi- 
cation is not missing from the job or that an end-of-file 
statement is not placed incorrectly in the job. 



A character other than A, 0, or blank is specified in 
column 7 of a specification that is part of an omit or 
include set. The specification is ignored and the next 
specification is processed. Correct the specification by 
placing an A or in column 7; then resubmit the job. 



SORT-7208 W 



OR CONTINUATION 
ASSUMED, COLUMN 7 



SORT-7181 W 



NO VALID ALTSEQ 
STATEMENTS FOUND 



ALTSEQ is specified on the header line, but no valid 
ALTSEQ statements were entered. The sort program 
ignores the ALTSEQ specification on the header line. 
If an alternate collating sequence is to be used, correct 
the invalid ALTSEQ statements, or add them if none 
were specified; then resubmit the job. If alternate 
collating sequence is not to be used, leave column 26 
of the header line blank to avoid this message. 



A blank is specified in column 7 of a statement that is 
part of an omit or include set. Column 7 should be A 
or 0. is assumed. If is incorrect, enter an A in 
column 7; then resubmit the job. If is correct, place 
an in column 7 to avoid this message. 
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SORT-7210 W 



INVALID C/Z/D/P/U/V 
SPECIFICATION, COLUMN 8 



SORT-7216 



LAST SET NOT A VALID 
INCLUDE SET 



An invalid entry is specified in column 8 of a specifica- 
tion statement. The valid entries are: 



Specification Type 

Include or omit record type 

Control field 

Data field or summary field 



Column 8 Entry 

C, Z, D, P, or U 
C, Z, D, P, or U 
C, Z, D, P, U, or V 



The sort program assumes a C in column 8. If C is 
incorrect, place the correct entry in column 8; then 
resubmit the job. If C is correct, place a C in column 8 
to avoid this message. 

Note: When the specification type is an include or omit 
record type and factor 2 is a keyword, column 8 must 
contain a C. When the specification type is a control 
field and you want an unconditional force or a force-all 
line, column 8 must contain a C. 



The last set of sequence specifications should be an 
include set, but one of the following occurred: 

— No specifications were specified after the header 
line. 

— The last set was an omit set. 

— The last set was an include set that contained no 
field specifications. 

Make one of the following corrections, depending on 
the condition that caused the message; then resubmit 
the job: 

— Supply the sequence specifications for the job. 

— Eliminate the omit set; the records are omitted 
by default. 

— Supply the missing field specifications. 



SORT-7218 S TOO MANY SEQUENCE 
SPECIFICATIONS 



SORT-7212 S SPECIFICATION IN WRONG 
LOGICAL ORDER 

The specification in error is either: 

— A control field specification (F in column 6) that 
incorrectly follows an omit specification (0 in 
column 6). 

— An omit specification (0 in column 6) that in- 
correctly follows an include specification (I in 
column 6). 

The specification is bypassed and the next specification 
is processed. Put the specifications in the correct order; 
then resubmit the job. 



SORT-7214 



INCLUDE OR OMIT STATE- 
MENT AFTER INCLUDE-ALL 



An INCLUDE-ALL specification was read for this job, 
but an include or omit specification (I or O in column 6) 
was found. Only control field specifications should 
follow the INCLUDE-ALL specification. The specifica- 
tions are processed as though the INCLUDE-ALL 
specification was not read. Remove either the 
INCLUDE-ALL specification or the include or omit 
specifications; then resubmit the job. 



All the main storage allocated by the sort program for 
the select/build routine and for error information was 
used, but there are still specifications to be processed. 
The remaining specifications are checked for errors. 
Remove all causes for error messages from the specifi- 
cations; then resubmit the job. If this error occurs 
again and no other error messages are issued, you must 
decrease the number of sequence specifications. 



SORT-7220 



TOO MANY 
ERRORS 



The main storage allocated by the sort program for the 
select/build routine and for error information was filled 
with error information. No more specifications can be 
processed. Correct all diagnosed errors; then resubmit 
the job. 
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SORT-7222 W 



ZONE OR V FIELD LENGTH 
EXCEEDS 1 



SORT-7228 W 



CHARACTER CONSTANT 
LENGTH EXCEEDS 20 



The referenced specification is a field specification (F 
in column 6). The type specified is a zone field (Z in 
column 8) or a V field (V in column 8) that should 
have a length of one byte. 

The specified number of bytes (calculated using 
columns 9 through 12 and 13 through 16) is used in 
building the work record field for this record type. The 
byte zone or overflow information generated is placed in 
the rightmost byte (low-order byte) of this field. The 
other positions to the left contain binary zeros (control 
fields) or blanks (data fields). If a one-byte zone or V 
field is incorrect, correct the field specification; then 
resubmit the job. 



SORT-7224 



COLUMNS 9-16 OR 
COLUMNS 20-27 ARE 
INVALID 



The location information (columns 9 through 16 and/or 
columns 20 through 27) in a specification is invalid 
because: 

— The From location is greater than the To location. 

— The To location is or blank. 

— The lengths of factor 1 and factor 2 are not equal. 
Correct the error; then resubmit the job. 



The specification causing this error is an include or omit 
specification (I or in column 6). Since a C is specified 
in columns 19, factor 2 is a character constant. The 
length implied by factor 1 (columns 9 through 12 and 
13 through 16) is greater than 20, the maximum 
allowed. The 20 rightmost characters in factor 1 are 
compared against the constant in columns 20 through 
39 for this job. Correct the specification statement if a 
20-character field is not correct or to avoid this message. 



SORT-7230 W 



SAME SPECIFICATION TYPE 
ASSUMED, COLUMN 6 



The specification causing this message has a blank in 
column 6, so the specification type is not known. How- 
ever, column 7 contains an A or O and the previous 
specification was an include or omit specification (I or 
O in column 6). Therefore, the sort program assumes 
that this specification is a record type specification and 
that the specification type is to be identical to that in 
the previous specification. If the assumption is incor- 
rect, correct the specification; then resubmit the job. 



SORT-7232 S ZONE SPECIFIED-FACTOR 
2 IS NOT A CONSTANT 



SORT-7225 



INVALID KEYWORD 
BEGINNING IN COLUMN 20 



The specification causing this error is an include or omit 
record type specification. A K was found in column 19, 
but neither UDATE, UMONTH, UDAY or UYEAR was 
found beginning in column 20. UDATE is assumed. 
Correct the specification; then resubmit the job. 



SORT-7226 W 



DIGIT FIELD LENGTH 
EXCEEDS 16 



A digit field length of more than 16 was specified in the 
specifications. A length of 16 is assumed. If the digit 
field length is actually 16 or less, correct the specifica- 
tion. If the digit field length is greater than 16, divide 
it into two different fields and create new specifications 
for these fields; then resubmit the job. 



A zone is specified in column 8 of an include or omit 
record type specification, but column 19 does not have 
a C specified. The specification is bypassed. Correct 
the specification; then resubmit the job. 



SORT-7234 W 



ZONESPECIFIED-RELA- 
TIONSHIPNOTEQOR NE 



A zone is specified in column 8 of the include or omit 
record type specification, but columns 17 and 18 do 
not contain EQ or NE. EQ is assumed and processing 
of the specification continues. If EQ is not the correct 
entry for columns 17 and 18, correct the specification, 
then resubmit the job. If EQ is correct, correct the 
specification to avoid this message. 
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SORT-7236 S INVALID RELATIONSHIP, 
/ COLUMNS 17-18 



SORT-7244 W 



PACKED DECIMAL-LENGTH 
EXCEEDS 8 



The specification causing this error is an include or omit 
record type specification. The relationship between 
factor 1 and factor 2, specified in columns 17 and 18, 
is not EQ, NE, LT, GT, LE, or GE. EQ is assumed. 
Correct the specification; then resubmit the job. 



SORT-7238 W 



INVALID FACTOR 2 TYPE, 
COLUMN 19 



A packed field is specified (P in column 8), but the field 
length is more than 8. A packed field can be only 8 
columns long. A field length of 8 is assumed and the 
rightmost eight bytes of the field are used for the include 
or omit. If column 19 contains a C, the constant in 
columns 20 through 35 of the specification is used as 
factor 2. Correct the specification before the job is run 
again. 



Column 19 of an include or omit record type specifica- 
tion does not contain an F (field), a C (constant), or a 
K (keyword). C is assumed; factor 2 is processed as a 
constant. Check column 19 for a missing or invalid 
entry. Correct the specification before the job is run 
again. 



SORT-7240 S 



UNPACKED DECIMAL- 
LENGTH EXCEEDS 16 



SORT-7246 W 



INVALID FIELD TYPE 
SPECIFICATION, COLUMN 7 



The specification causing this error is a field specifica- 
tion, but column 7 does not contain an F, N, 0, D, or S. 
An entry of N (normal control field) is assumed if there 
are no previous data or summary data field specifications 
for this include set. Otherwise, an entry of D (data field) 
is assumed. Correct the specification before the job is 
run again. 



The specification causing this error contains a U in 
column 8, indicating unpacked decimal. Columns 
9 through 16 define a factor 1 field that is longer than 
the allowable 16 bytes. A length of 16 is assumed. 
Check the To and From columns to determine the 
error. Correct the error before the job is run again. 



SORT-7242 W 



ZONE SPECIFIED-LENGTH 
EXCEEDS 1 



The specification causing this error is an include or omit 
record type specification that has a Z in column 8. In 
this case, factor 1 must be one byte long, but it is not. 
A length cf one is assumed and the constant in column 
20 of the specification is processed. Correct the specifi- 
cation before the job is run again. 



SORT-7248 



ILLEGAL FORCE-ALL 
CONTINUATION 



The specification causing this error is a field specifica- 
tion for a force-all specification (F in column 7). This 
specification should follow a conditional force specifi- 
cation, but it does not. The specification is ignored. 
Correct the specification; then resubmit the job. 



SORT-7250 S FIELD STATEMENTS IN 

WRONG LOGICAL ORDER 

The specification causing this error is a control field 
specification that follows a data (D) or summary (5) 
specification in this include set. All control field speci- 
fications (N, O, or F in column 7) must precede any 
data or summary data field specifications. This specifi- 
cation is bypassed and the next specification is pro- 
cessed. The specification might be misplaced or specified 
incorrectly. Correct the specification; then resubmit the 
job. 
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SORT-7252 S CONTROL FIELD LENGTH 
EXCEEDS HEADER VALUE 



SORT-7262 



DATA LENGTH EXCEEDS 
HEADER VALUE 



The accumulated total of the control field lengths in this 
include set exceeds the value specified in the header line. 
The remaining specifications in the include set are pro- 
cessed. Check the length specified in the header line 
against the specified control fields. Correct the errors; 
then resubmit the job. 



SORT-7254 W 



CONTROL FIELD LENGTH 
LESS THAN HEADER VALUE 



All control field specifications for this include set were 
processed, and the accumulated length of control fields 
is less than the value specified in the header line. The 
remaining positions are filled with hex zeros. Check the 
length specified in the header line against the specified 
control fields. Correct any errors before the job is run 
again. 



SORT-7256 S CHARACTER FIELD 

SPECIFICATION-LENGTH 
EXCEEDS 256 

A length greater than 256 is specified in a character field 
specification (C in column 8). The rest of the sequence 
specifications are processed. Check the character field 
specifications. If you require more than 256 positions 
of data, divide the field into two or more field specifica- 
tion statements. Correct the error; then resubmit the 
job. 



A SORTR or SORTRS job is being processed and the 
data field specifications (FD or FS in columns 6 and 7) 
for this include set exceed the value in the header line. 
An error exists in either the output record length in the 
header line or in the To and From fields in the field 
description lines. If you are dropping the control field 
(X in column 28 of the header line), the data length is 
the output record length (columns 29 through 32 of the 
header line). If you are not dropping the control field, 
the control field length (columns 13 through 17 of the 
header line) must be subtracted from the output record 
length to determine the data field length. Correct the 
error; then resubmit the job. 



SORT-7264 W 



SPECIFICATION IN WRONG 
NUMERICAL ORDER 



Columns 1 through 5 of each sequence specification 
statement are used to order the specifications. One or 
more of the specification statements in this job has a 
value in columns 1 through 5 that is less than the value 
in the preceding specification statement. On the source 
listing, an S is printed to the left of the specification 
statements that are out of order. To avoid this error, 
correct the entries in columns 1 through 5 of the 
sequence specifications so that no entry is less than that 
on the previous specification statement. 



SORT-7266 



FACTOR 1 LENGTH 
EXCEEDS 256 



SORT-7258 S TO OR FROM FIELD NOT 
WITHIN INPUT RECORD 

Either one or both of the specifications in the To or 
From columns are zero or contain a value larger than 
the input record length. Make sure the correct input 
file was specified and the To and From columns contain 
the correct values. Correct the error; then resubmit the 
job. 



The specification causing this error is an include or omit 
specification for character data (C in column 8). Factor 
2 is a field (F in column 19) and the length of factor 1 is 
greater than 256, the maximum length. The sort pro- 
gram assumes a length of 256 for factor 1 . If the length 
of factor 1 must be more than 256, divide this specifica- 
tion into two specifications with an AND continuation 
line (A in column 7); then resubmit the job. 
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SORT-7268 W 



POR U FACTOR 1 USED 
WITH ALTSEQ 



SORT-7280 W 



NUMBER OF SUMMARY 
FIELDS INCONSISTENT 



An include or omit record type specification specifies a 
packed or unpacked factor 1, but the header line speci- 
fies an alternate collating sequence. The sort program 
changes factor 1 and factor 2 as the ALTSEQ specifica- 
tions indicate. This change can affect the units position 
(and the sign) of an unpacked decimal number or any 
one position of a packed decimal number. As a result, 
the desired records might not be included or omitted. 
Do not specify P or U in column 8 of the record type 
entries when you specify an alternate collating sequence. 



SORT-7276 W 



MORE THAN ONE SUMMARY 
V FIELD IN INCLUDE SET 



This is a SORTRS job. The specification causing the 
error specifies a summary V field (FSV in columns 6 
through 8), but at least one other summary V field was 
already specified for this include set. The statement 
in error is assumed to specify a data V field (FDV in 
columns 6 through 8). To avoid this error, change the 
extra summary V fields to data V fields. 



SORT-7278 W 



SUMMARY V OR DATA 
FIELD INCONSISTENT 



This is a SORTRS job. The specification causing the 
error is a summary data field specification (S in column 
7). To determine which of the following conditions is 
true, compare this specification with the first include set 
having S specifications: 

— The number of S specifications prior to this 
specification differs. 

— The length of this S specification differs. 

— The substitution character of the V specification 

— The relative location of the specification within 
the output record differs. 

The S specifications of the first include set containing 
S specifications define the summary field positions. 
Correct the specifications; then resubmit the job. 



This is a SORTRS job. The number of S specifications 
in this include set is different from the number of S 
specifications in the first include set. The S specifications 
of the first include set with S specifications form the 
summary output record. To avoid this error, correct 
the include sets so they all have the same number of S 
specifications. 



SORT-7282 W 



NO SUMMARY SPECIFICA- 
TIONS-SUMMARY SORT 



The header line specifies that this is a SORTRS job, but 
there are no summary data field specifications. All 
records with duplicate control fields are eliminated from 
the output file. Check the job type to be sure that a 
SORTRS job was intended. 



SORT-7284 W 



SUMMARY SPECIFICATIONS 
IGNORED 



This is a SORTR job; consequently, no summary data 
field specifications (FS in columns 6 and 7) were ex- 
pected. However, at least one was found. All S specifi- 
cations are treated as data specifications (D in column 
7). Make sure this should be a SORTR job. If not, 
correct the specifications; then resubmit the job. 



SORT-7286 S 



TOO MANY SUMMARY 
DATA FIELDS 



This is a SORTRS job. More than 24 summary data 
fields were specified (FS in columns 6. and 7 and C, D, 
P, or U in column 8). Limit the number of summary 
data fields to 24 or less. 
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SORT-7288 W 



INVALID SUMMARY 
SPECIFICATION- 
COLUMNS 20, 21, 22 



The overflow field length in columns 20 through 22 is 
incorrect because it is: 

— An invalid entry 

— Not right-justified 

— Less than the field length given by the To and 
From entries 

The entry is assumed blank. If a valid entry was intend- 
ed in columns 20 through 22, correct the entry; then 
resubmit the job. 



SORT-7402 



NO ERRORS FOUND 



No errors were found during the generation phase of 
the job. Processing continues with the execution phase. 



SORT-7403 



OPERATOR CHOSE TO 
CANCEL JOB 



At the end of the generation phase, sort displayed 
message SORT-7722 was issued and the operator 
canceled the job. 



SORT-7404 



SORT-7391 



MAIN STORAGE TOO 
SMALL 



The amount of main storage assigned to the sort pro- 
gram is not large enough to process this job. The job 
cannot be run. Make sure: 

— The correct input file was specified. 

- If this is a SORTR or SORTRS job, the output 
length specified in the header line is correct. 

Correct the errors; then resubmit the job. If there are 
no errors, increasing the region size may allow the job 
to execute. 



SORT-7395 T DISK SPACE NOT AVAILABLE 
FOR WORK FILE 

The sort program was attempting to automatically allo- 
cate space for the work file, but not enough space was 
available on the disk. See the description of sort dis- 
played message SORT-7733. Sort displayed message 
SORT-7733 was issued prior to this message and the 
operator selected the controlled cancel. 



SORT-7401 



JOB COMPLETED 
GENERATION PHASE 



OPERATOR CHOSE TO 
CONTINUE JOB 



At the end of the generation phase, sort displayed 
message SORT-7722 was issued and the operator con- 
tinued the job. 



SORT-7422 A 



XXX WARNING ERRORS 
FOUND DURING 
GENERATION PHASE 



During the generation of this job, no severe or terminal 
errors were found. However, a number of warning errors 
were found that could affect the execution of the job. 
Statements entered or specified incorrectly probably 
caused the errors. Sort displayed message SORT-7722 
is issued after this message. 



SORT-7423 A 



DISK ERROR WHILE 
READING SEQUENCE 
SPECIFICATIONS 



A disk error occurred while the sequence specifications 
were being read. Sort displayed message SORT-7723 is 
issued after this message. 



The generation phase is complete. All statements were 
checked for errors. If severe or terminal errors were 
found during generation, sort displayed message 
SORT-7725 is issued; if only warning errors were 
found, sort displayed message SORT-7722 is issued. If 
no errors were found, the job proceeds to the execution 
phase. 



SORT-7425 A 



SEVERE/TERMINAL ERRORS 
DURING GENERATION 
PHASE 



Severe and/or terminal errors occurred during the gener- 
ation of this job. Sort displayed message SORT-7725 
is issued after this message. 
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SORT-7450 



XX, XXX MAIN STORAGE 
BYTES ASSIGNED 



This message indicates the amount of main storage 
assigned for the sort program. 



SORT-7601 



#XX PASS COMPLETED 



Sort pass XX was completed successfully. The first 
sort pass is 00, the second pass 01, and so on. 



XXXX BYTES-INPUT 
RECORD LENGTH 



SORT-7451 I 

This message indicates the input record length 



SORT-7602 I 



XXXXXX INPUT RECORDS 
WERE READ IN 



This message indicates the number of input records 
read for your job. 



SORT-7452 I XXXX BYTES-WORK FILE 
RECORD LENGTH 

This message indicates the record length used for the 
work file. The record length is computed from the 
information in the header line. 



SORT-7603 I 



XXXXXX RECORDS WERE 
SELECTED TO BE SORTED 



This message indicates how many input records will be 
sorted. 



SORT-7453 I XXXX BYTES-OUTPUT 
RECORD LENGTH 

This message indicates the record length of the output 
file. The record length is computed from the informa- 
tion in the header line. 



SORT-7620 A NO INPUT RECORDS WERE 
SELECTED FOR SORTING 

None of the input records met the include requirements 
of the sort sequence specifications. Check the specifica- 
tions or input records that were specified. Sort displayed 
message SORT-7724 is issued after this message. 



SORT-7461 



XXXX BYTES- 
SELECT/BUILD ROUTINE 



This message indicates the number of bytes in main 
storage occupied by the sequence specifications 
(including any alternate collating statements). 



SORT-7681 A WORK RECORD COUNT 
IN ERROR 

This message indicates an error in the sort program. 
Contact IBM for program support services. 



SORT-7462 I 



XXXX bbuUtNut SPECIFI- 
CATION STATEMENTS 



This message indicates the number of sequence specifica- 
tions that the generation phase processed for this job. 



SORT-7690 I SORT STARTING FINAL 
PASS 

The final pass of the job began. Records are being 
written on the output file. 



SORT-7600 I INITIAL PHASE STARTED 

The execution phase of the job began. Records are being 
read from the input file and written to the work file in 
intermediate strings. 



SORT-7691 



FINAL PASS SUCCESS- 
FULLY COMPLETED 



The final pass of the job was completed with no errors. 



Sort Printed Messages E-1 1 



SORT-7692 I XXXXXX SORTED RECORDS 
PLACED ON OUTPUT FILE 

The last pass of the sort is complete. This message indi- 
cates how many output records were sorted and placed 
on the output file. 



SORT-7929 A 



DISK ERROR WHILE 
READING OR WRITING 
THE WORK FILE 



A disk error occurred while reading or writing records 
on the work file. Sort displayed message SORT-7729 is 
issued after this message. 



SORT-7693 



NO RECORDS FOUND 
THE INPUT FILE 



IN 



No records are in the input file. If the job is continued, 
a null output file is created. Make sure the correct input 
file was specified and that the file contains the desired 
records. Sort displayed message SORT-7724 is issued 
after this message. 



SORT-7930 A 



DISK ERROR WHILE 
WRITING TO THE OUTPUT 
FILE 



A disk error occurred while the sorted records were 
being written to the output file. Sort displayed 
message SORT-7730 is issued after this message. 



SORT-7694 



XX PASSES REMAINING 



This message indicates the number of passes left for 
this job. 



SORT-7931 A WORK FILE TOO SMALL 

The sort work file is full. See the description of sort 
displayed message SORT-7731. Sort displayed message 
SORT-7731 is issued after this message. 



SORT-7695 I XXXX BLOCKS USED FOR 
WORK FILE 

This message indicates the number of blocks that were 
used for the work file. 



SORT-7932 A OUTPUT Fl LE TOO SMALL 

The sort output file is full. See the description of sort 
displayed message SORT-7732. Sort displayed message 
SORT-7732 is issued after this message. 



SORT-7901 I ****** NORMAL EOJ ****** 
The sort job was completed. 

SORT-7902 I ****** ABNORMAL EOJ ****** 

Errors prevented the sort job from being run to normal 
completion. 



SORT-7928 A DISK ERROR WHILE 

READING THE INPUT FILE 

A disk error occurred while reading records from an 
input file. Sort displayed message SORT-7728 follows. 
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Glossary 



addrout file: A record address disk file produced by the 
sort program. An addrout file contains the binary relative 
record numbers of records in a disk file, and can be used to 
process the file designated as the input file to the sort 
program. 

addrout sort: A type of sort where the output consists of 
3-byte, binary, relative record numbers that indicate the 
relative positions (1st, 20th, 99th) of records to be pro- 
cessed in a disk file. 

alphabetic character: Any one of the letters A through Z, 
or one of the special characters #, $, and @. 

alphabetic field: One or more alphabetic characters of re- 
lated information in a record. 

alphameric character: An alphabetic character, or one of 
the digits through 9. 

alphameric field: One or more alphameric characters of 
related information in a record. 

alternate collating sequence: A user-defined collating 
sequence that alters the standard EBCDIC collating 
sequence. 

ALTSEQ statement: A statement that defines an alter- 
nate collating sequence to the sort program. 

backup copy: A copy of a file or of a library member that 
is kept in case the original file or library member is 
destroyed. 



byte: (1 ) A sequence of 8 adjacent bits that are operated 
on as a unit and that comprise the smallest addressable unit 
in the System/34. (2) The representation of a character 
by 8 binary bits; the amount of storage required for one 
EBCDIC character. 

cataloged procedure: A set of OCL statements that have 
been placed in a library. 

character: A digit, letter, or other symbol that is used as 
part of the control, organization, or representation of 
data. 

column: A vertical arrangement of characters, as on a 
punched card or a coding form. 

command: A request for the performance of an operation 
or the execution of a particular program. 

command statement: A statement that requests the per- 
formance of a particular function. A command statement 
always contains the name of the command, and may in- 
clude parameters. 

conditional force: If the control field in the input record 
contains a particular entry, the control field character is 
replaced before the record is sorted. 

consecutive processing: File processing that reads records 
in the order in which they exist in the file. 

constant: A unit of data that does not change during 
execution of a program. 



binary: Relating to, being, or belonging to a system of 
numbers having 2 as its base (for example, the binary 
digits and 1). 

binary digit (bit): In binary notation, either of the charac- 
ters or 1 . See also byte. 

bit: A binary digit. 



control field: One or more specified fields that are com- 
pared to determine the record sequence in the output file. 

control statement: A statement that provides the SSP or 
utility program with information about the job being run. 

data: A collection of facts, numbers, letters, and symbols 
that can be processed by a computer. 



block: (1) A record or a collection of contiguous records 
recorded or processed as a unit. (2) In System/34, a 10- 
sector unit of disk storage that contains 2,560 bytes. 



data field: See field. 

direct file: A file in which, for purposes of storage and re- 
trieval, there is a relationship between the contents of the 
records and their positions in the file. 
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disk file: An organized collection of related records on disk 
that are treated as a unit. 

display screen: The part of a display station on which data, 
messages, or other information is displayed. 

display station: An input/output device containing a 
display screen on which data is displayed, and an attached 
keyboard from which data is entered. It can be used to 
request jobs and/or enter data. 

displayed message: A message that appears on the display 
screen and is documented in the Displayed Messages Guide. 

documented message: Any message that is explained in a 
manual. A documented message contains a message identi- 
fier code that directs the operator or programmer to an 
explanation of the message in the message manual or in a 
reference manual. 

EBCDIC (extended binary-coded decimal interchange code): 
A character set containing 256 eight-bit characters. 

execution phase: The part of the sort program that reads 
the records you want to sort, sorts the records, and writes 
the sorted records into the output file. 

field: One or more bytes of related information in a 
record. 

file: An organized collection of related records treated 
as a unit. 

file label:See/a&e/. 

filename: An arbitrary symbol created by the programmer 
or program to identify and refer to a collection of related 
records. 

force-all: If the control field in the input record does not 
contain a particular entry, the control field character is 
replaced before the record is sorted. 

forced control field: A one-position control field that 
results from replacing one character with another character, 
or from forcing a character into a control field position. 

generation phase: The part of the sort program that trans- 
lates the sequence specifications into machine language. 

hexadecimal: Pertaining to a number system with a base 
of 16; valid digits range from (zero) through F (fifteen). 



implied include-all: Omission of all record type specifica- 
tions to indicate that all records are to be included in 
the sort. 

include-all: A special form of an include set that tells the 
sort program to sort all of the records that have not pre- 
viously been described. 

include set: Sort sequence specifications that identify one 
or more record types that you want to sort. 

indexed file: A file in which the position of each record is 
recorded in a separate portion of the file called an index. 

input file: A file containing the data that the sort program 
will process. 

input record: A data record that is transferred to computer 
storage for processing. 

integer: A positive or negative whole number (a number 
that does not have a decimal point or exponent). 

job: One or more related procedures or programs grouped 
into a procedure. 

job step: A unit of work represented by a single program. 

keyword: A nonvariable character string in sequence 
specifications (such as UDATE). 

label: The name in the disk or in the diskette volume table 
of contents that identifies a file. 

library: An area on disk that can contain load members, 
procedure members, source members, and subroutine mem- 
bers. See also system library and user library. 

library member: A named collection of records or state- 
ments in a library. 

member: Same as library member. 

message: A series of words or symbols designed to con- 
vey information. 

multiple disk system: A system that has more than one 
disk. 

normal control field: Any control field that is specified by 
an N in column 7 of the field specifications. 

numeric: Pertaining to the digits through 9. 

OCL: Operation control language. 
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omit set: Sort sequence specifications that identify one or 
more record types that you do not want to sort. 

operation control language (OCL): A programming 
language used to identify a job and its processing require- 
ments to the SSP. 

opposite control field: Any control field that is specified 
by an in column 7 of the field specifications. 

output file: A file containing the data that results from the 
sort program processing. 

output record: A sorted record that is written to the out- 
put file by the sort program. 



program product: An IBM-written, licensed program for 
which a monthly charge is made. A program product per- 
forms functions related to processing user data. 

prompt: A message issued by a program that requests 
either information or an operator action to continue 
processing. 

real number: A number (which contains a decimal point) 
stored in floating point format. The leftmost byte of a 
real number contains the sign and the exponent (decimal 
point location). The remaining bytes of the whole number 
contain the fraction (decimal point portion value) or the 
fraction and mantissa (portion of the number to the left 
of the decimal point) in left-adjusted, binary format. 



overflow field: In a summary tagalong sort, a field that 
allows for anticipated field expansion. 



record: A collection of related data, treated as a unit. For 
example, one line of an invoice can comprise a record. 



overlay: To write over (and therefore destroy) an exist- 
ing file. 

packed decimal format: Each byte within a field represents 
two numeric digits except the rightmost byte, which con- 
tains one digit in bits through 3 and the sign in bits 4 
through 7. For all other bytes, bits through 3 represent 
one digit; bits 4 through 7 represent one digit. For 
example, the decimal value +123 is represented as 0001 
0010 0011 1111. Contrast with zoned decimal format. 

packed field: A field that contains data in the packed 
decimal format. 



record address file: An input file that indicates to a pro- 
gram which records are to be read from a disk file, and the 
order in which these records are to be read from the disk 
file. 

record length: The total number of characters (bytes) in 
a record. 

record type: The classification of records in a file. Records 
are classified according to a specific field or fields within 
each record. 

region: The amount of main storage available for a task. 



parameter: A value specified in a command statement or 
a control statement. 



relative record number: A number that specifies the loca- 
tion of a record in relation to the beginning of the file. 



position: The address (location) of a character in a series, 
as in a record. 

printed message: A message issued by the sort program 
that is printed on a printer or displayed on the display 



procedure: A set of related OCL statements, and possibly 
utility control statements, that cause a specific function or 
set of functions to be performed. A procedure in a library 
is called a procedure member. 

procedure member: A procedure that is stored in a library. 

program: A sequence of instructions to a computer, writ- 
ten in a special form that the computer can interpret. 

program date: The date associated with a program (or job 
step). 



right-adjust: The placement of data in a register or field, or 
the shifting of the contents of a register or field, so that the 
last significant byte at the right end of the data is placed 
in the rightmost position of the register or field. See also 
right-justify. 

right justify: The adjustment of positions of characters on 
a page so that the right margin of the page is regular. See 
also right-adjust. 

select field: A field tested for a condition to determine 
whether a record should be included in, or omitted from, a 
sort job. 

sequence specifications: See sort sequence specifications. 

sequential file: A file in which records are entered one 
after the other; a file in which there is no relationship be- 
tween the contents of the records and their positions in the 
file. 
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sort program: A part of the Utilities Program Product used 
to arrange records (or their relative record numbers) in a 
predetermined sequence, according to data contained in 
one or more specific fields within the records. 

sort sequence specifications: Source statements for the 
sort program. 

source member: A collection of records (such as sort 
sequence specifications) that is used as input for a program. 
Source members are stored in a library. 

special character: A character other than a digit, a letter, 
or #, $, and @. For example, *, +, and % are special 
characters. 

SSP: System Support Program Product. 



Utilities Program Product: A multipurpose program 
product for creating, displaying, maintaining, listing, and 
sorting data files, and for creating, displaying, maintain- 
ing, and listing source members and procedure members in 
a library. 

utility control statement: A control statement that gives a 
utility program information concerning the way the pro- 
gram is to perform its function or the output it is to 
produce. 

volume table of contents (VTOC): An area on a disk or 
diskette that describes the location, size, and other charac- 
teristics of each data file on the disk or diskette. 

work file: An area on disk that is reserved for temporary 
storage of data being sorted. 



summary data field: In a summary tagalong sort, a data 
field designated for accumulated totals. 



work record: A record built by the sort program for sub- 
sequent processing. 



summary tagalong sort: A type of sort that arranges 
records according to a specified control field (s), and can 
accumulate totals from specified data fields within the 
sorted records. 

system library: The library containing the members that 
are part of the SSP. See also library and user library. 

tagalong sort: A type of sort that arranges records accord- 
ing to a specified control field (s), and can include data 
fields, control fields, or both data fields and control fields 
in the sorted output. 



zoned decimal format: Representation of a decimal value 
by 1 byte per digit. Bits through 3 of the rightmost byte 
represent the sign; bits through 3 of all other bytes re- 
present the zone portion; bits 4 through 7 of all bytes 
represent the numeric portion. For example, in zoned 
decimal format, the decimal value of +123 is represented 
as 1111 0001 1111 0010 1111 0011. Contrast with 
packed decimal format. 

zoned field: A field that contains data in the zoned deci- 
mal format. 



task: A unit of work for the main storage processor. 

unconditional force: A character is always forced into the 
control field before the record is sorted. 

user library: A library created by the user. A user library 
is in addition to the system library, and may contain any 
type of library member. See also library and system 
library. 
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to sequence information in sorted records 4-7 
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type 1 D-9 
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initializing an overflow field 4-1 1 
input file 
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FILE statement required for 5-2 
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limitations when using the SORT command 5-4 

overlay considerations 5-2 
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running your own procedure 5-5 
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input file label 5-3 
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type of sort 2-2 
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job step 

defined F-2 

in multiple-step procedure 5-4 



keyboard, procedures entered through 5-7 
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defined F-2 

indicated by column 19 of record type specification 3-10 
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factor 2 constant (columns 20-39— record type 
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types issued by the sort program 2-3 
multiple disk system 
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non-verify option (column 34— header specification) 2-4 

timing considerations 2-4 
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OCL statements 
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what they tell about the work file 5-5 
omit line 
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summary tagalong sort 1-4 
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printed messages 2-3 
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SORT command 5-3 
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possible keywords for 3-13 
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definition F-3 
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how order of affects sort time 6-3 
region 

defined F-3 
region size 

effect on sort time 6-3 
minimum 6-3 
relation (columns 17-18— record type specifications) 3-10 
effect on omitting or including records 3-10 
to specify factor 1 and factor 2 comparison 3-1 
relative record numbers, addrout sort output 1-2 
replacements for more than one character (column 19— 
field specifications) 
when and how to indicate 4-13 
running time, sort job 5-2, 6-1 
factors that affect 6-1 



sample sort jobs 7-1 
SORTA 

relative record addresses for inventory 
file 7-7 through 7-9 
SORTR 

stock items to reorder 7-3 through 7-6 
transaction activity 7-9 through 7-16 
summary history 7-22 through 7-24 
using signed control fields 7-22 
SORTRS 

inventory adjustments 7-17 through 7-18 
customer number issues 7-19 through 7-21 
select/build routine 
defined 6-1 
storage required for 6-1 
sequence 

changing collating sequence of one character B-4 
changing collating sequence of several characters B-4 
standard and alternate collating B-3 
sequence (column 18— header specification) 2-2 
to indicate sorted record sequence 2-2 



sequence error message 

field specifications 4-3 

header specification 2-2 

record type specifications 3-2 
sequence specifications 

defined F-3 

for a summary tagalong sort (SORTRS) 1-11 

for a tagalong sort (SORTR) 1 -1 

for an addrout sort (SORTA) 1-9 

grouping of 1-8 

how number of affects sort time 6-1 

inserting new ones in field lines 4-3 

inserting new ones in record type lines 3-2 

lines issued by the sort program 2-3 

normal order of 1-8 

recommended number for sort job 6-1 

sequence numbers for 2-2 

storage of 1 -7 

use of 1 -7 

using additional to decrease sort time 6-1 

warning issued if not in order 2-2 

wrong ones used 5-5 
sequence specifications sheet 

location and purpose of specification types 1 -6 

types of specifications 1-6 
sequencing 

on field specifications 4-3 

on header specification 2-2 

on record type specifications 3-2 

using control fields 4-6 
set 

include set 3-3 

omit set 3-4 

rules for using include and omit sets 3-3 

types of include sets 3-3 

types of omit sets 3-4 
sign code 

packed and zoned numeric data 3-7 

placement in packed and zoned numeric data 3-8 
signed constants 3-12 
signed numbers 3-7 

how to code when used as factor 2 (columns 20-39— recor( 
type specifications) 3-1 1 

possible sign codes 3-7 
single disk system 

file placement on 6-2 
size of records, affect on sort time 6-1 
size of work file 5-2 ' 

sort 

types of 1 -2 
SORT command 

how keyed 5-3 

limitations 5-4 

parameters 5-3, 5-4 

prompts for 5-3 

sequence specifications placement when using 5-3 

used to run sort 5-3 

what it does 5-3 

work file allocation when using 5-4 

why used 5-3 
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sorting 

integer (binary) D-1 

specifications for positive integer D-1 through D-2 
specifications for positive or negative integer D-3 
through D-5 

real number D-1 

specifications for positive integer D-1 through D-2 
specifications for positive or negative real number 
D-6 through D-8 
sort jobs 

(see also sample sort jobs) 

stages of 2-3 

types of 1 -2 
sort messages (see messages) 
sort printed messages E-1 

issued E-1 
sort procedures 

entering through a display station keyboard 5-7 

executing when stored on disk 5-6 

file information needed when using your own 5-5 

running sort when using your own 5-5 

source member information needed when using your own 5-6 
sort program 

defined F-4 

execution of 1 -7 

file types used 1-5 

functions of 1-1 

general description 1-1 

how works 1-5 

input needed 1-5 

interaction with input, work, and output files 1-7 

multiple copies of 1 -1 

operation 1-7 

output considerations 5-5 

procedures stored on disk, executing 5-6 

programmer messages 2-3 

sequence specifications 1-6 
sort time 6-1 

affected by location of files 6-2 

affected by number of records 6-1 

affected by number of sequence specifications 6-1 

affected by order of records in input file 6-3 

affected by record size 6-1 

affected by using alternate collating sequence 6-1 

affected by using automatic work file allocation 6-3 
sort sequence specifications (see sequence specifications) 
SORTA (addrout sort) 

(see also sample sort jobs) 

contents of sorted records 1-2 

function 1-2 

input file overlay 5-2 

output 1-2 

running time 5-2 

sequence specifications 1 -9 

using summary data fields 4-5 

work file size 5-2 
sorted file, contents 1 -5 



SORTR (tagalong sort) 

(see also sample sort jobs) 

calculating output record length 2-3 

contents of sorted records 1 -3 

function 1-3 

input file overlay 5-2 

output 1-3 

running time 5-2 

sequence specifications 1-10 

using summary data fields 4-5 

work file size 5-2 

SORTRS (summary tagalong sort) 

(see also sample sort jobs) 

calculating output record length 2-3 

contents of sorted records 1 -4 

function 1-4 

input file overlay 5-2 

output 1-4 

running time 5-2 

sequence specifications 1-11 

using overflow indicator fields 4-1 2 

using summary data fields 4-5 

work file size 5-2 
source member 

creating and updating 5-6 

defined F-4 

information needed 

when running your own procedures 5-6 
when using the SORT command 5-3 
SOURCE statement, running your own procedures 5-6 
standard collating sequence 

specified on header line (column 26) 2-2 

table B-1.B-2 

when digit portion is used B-1, B-2 

when zone and digit portions are used B-1 , B-2 

when zone portion is used B-1 , B-2 
substitute character (column 18— field specifications) 

conditionally forced 4-11 

used to initialize summary overflow fields 4-1 1 

when and how character is forced 4-1 1 
summary data fields 

defined F-4 

how overflow indicated 4-12 

how to define 4-5 

maximum number defined 4-5 

used by each type of sort 4-5 
summary overflow field 

how to define 4-12 

how to initialize 4-11 
summary sort (SORTRS) (see SORTRS) 
summary sort overflow 4-1 1 
summary tagalong sort (SORTRS) 

(see also SORTRS) 

defined F-4 
system data 

alphameric 3-6 

how characters represented within the computer 3-6 

how signed numeric constants are represented on record 
type specifications 3-7 

how to interpret 3-5 

in compare operations 3-5 

numeric data 3-7 

zone and digit portions of characters 3-6 
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system environment 

affect on sort job running time 6-3 
system library 

defined F-4 

searched if source member not found on disk 
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tagalong sort (SORTR) 

(see also SORTR) 

defined F-4 
time required to sort a file 5-2, 6-1 

affected by alternate collating sequence 6-1 

affected by automatic work file allocation 6-3 

affected by file location on disk 6-2 

affected by multiple disk system 6-2 

affected by multiprogramming mode 6-2 

affected by non-verify option 6-3 

affected by number of input records 6-1 

affected by number of sequence specifications 6-1 

affected by order of records in the input file 6-3 

affected by region size 6-3 

affected by single disk system 6-2 

affected by size of records 6-1 

affected by system environment 6-3 
to entry (columns 13-16— record type specifications) 3-9 

to identify last position of factor 1 field in the 
input record 3-9 
to entry (columns 24-27— record type specifications) 3-10 

to identify last position of factor 2 field in input record 3-10 
translation table and alternate collating sequence coding sheet B-5 
types of sort 1 -2 



unconditional force 

defined F-4 

example 4-14 

explanation 4-5 
unconditionally forced character, how to define 4-14 
user library 

action taken if omitted 5-3 

defined F-4 

when required 5-3 
using duplicate control fields 4-4 



warning 

issued when sequence numbers not in order 2-2 
work file 

automatic allocation 5-1 

calculating size when programming A-1 

calculating storage tracks for A-1 

defined F-4 

FILE statement needed when input file shared 5-4 

how position on disk affects sort time 6-2 

how used 1-5 

programming considerations 5-1 , 5-2 

running your own procedure 5-5 

SORT command affect on 5-5 
work record, how used by sort 1-5 
work record length 

affected by type of output A-1 

affected by type of sort A-1 



zone, portion of system character 3-6 
zoned numeric data 3-7 

number of bits in each digit 3-7 

numbers 3-7 

position of the sign code 3-8 

possible positive and negative sign codes 
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support, requests for additional publications, etc, should be directed to your IBM representative or to the IBM branch office nearest your location. 



Error in publication (typographical, illustration, and so on). No reply. 
Page Number Error 



Inaccurate or misleading information in this publication. Please tell us 
about it by using this postage-paid form. We will correct or clarify the 
publication, or tell you why a change is not being made, provided you 
include your name and address. 

Page Number Comment 



co 
o 


CO 


r* 


<: 


Tl 


CO 




"< 


cs 


CD 


to 

3 


d 


O 


M 




■tk 



Note: All comments and suggestions become the property of IBM. 



* No postage necessary if mailed in the U.S.A. 



| | Check if reply is requested. 
Name 



Address 



CO 

O 
ro 

>Ij 
o> 
01 
oo 



O^^I-/ODO->l 



Fold 



Fold 



FIRST CLASS 
PERMIT NO. 40 
ARMONK, N. Y. 



BUSINESS REPLY MAIL 

NO POSTAGE STAMP NECESSARY IF MAILED IN THE UNITED STATES 



POSTAGE WILL BE PAID BY . . 



IBM Corporation 
General Systems Division 
Development Laboratory 
Publications, Dept. 245 
Rochester, Minnesota 55901 




Fold 



Fold 



International Business Machines Corporation 

General Systems Division 
4111 Northside Parkway N.W. 
P.O. Box 2150 
Atlanta, Georgia 30301 
(U.S.A. only) 

General Business Group/International 

44 South Broadway 

White Plains, New York 10601 

U.S.A. 

(International) 



r 



International Business Machines Corporation 

General Systems Division 
4111 Northside Parkway N.W. 
P.O. Box 2150 
Atlanta, Georgia 30301 
(U.S.A. only) 

General Business Group/International 

44 South Broadway 

White Plains, New York 10601 

U.S.A. 

(International) 



03 

2 

CO 

< 



5 

I 

5" 



i i 

k ■ 



3 

C 
CO 

> 

CO 

B 



SC2 1-7658-1 



